Wolfram Data Repository

Immediate Computable Access to Curated Contributed Data

Sample Data: Bronze Gradient Filter

Source Notebook

Locations of bronze particles in a gradient filter annotated with radii (in millimeters) marks

Details

Locations of bronze particles centers, observed in a longitudinal plane section through a gradient sinter filter produced by sedimentation of bronze powder with varying grain diameter and subsequent sintering. The observation region is a 18mm by 7mm rectangle. The point annotations are radii of the particles given in mm.

Examples

Basic Examples (1) 

In[1]:=
ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"]
Out[1]=

Summary of the spatial point data:

In[2]:=
ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"]["Summary"]
Out[2]=

Visualizations (1) 

Plot the spatial point data:

In[3]:=
ListPlot[ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"], AspectRatio -> 1, Frame -> True]
Out[3]=
In[4]:=
PointValuePlot[ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"], PlotLegends -> Automatic]
Out[4]=

Analysis (2) 

Compute smooth point density:

In[5]:=
density = SmoothPointDensity[ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"]]
Out[5]=
In[6]:=
Show[ContourPlot[density[{x, y}], {x, y} \[Element] ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"]["ObservationRegion"]], ListPlot[ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"]["Points"], PlotStyle -> Black]]
Out[6]=

Test for complete spatial randomness:

In[7]:=
SpatialRandomnessTest[ResourceData[\!\(\* TagBox["\"\<Sample Data: Bronze Gradient Filter\>\"", #& , BoxID -> "ResourceTag-Sample Data: Bronze Gradient Filter-Input", AutoDelete->True]\), "Data"], {"PValue", "TestConclusion"}]
Out[7]=

Gosia Konwerska, "Sample Data: Bronze Gradient Filter" from the Wolfram Data Repository (2022)  

Data Resource History

  • Date Created:

Source Metadata

  • Citation:
    • Bernhardt, R., Meyer-Olbersleben, F. and Kieback, B. (1997)
      Fundamental investigation on the preparation of gradient structures by sedimentation of different powder fractions under gravity. Proc. of the 4th Int. Conf. On Composite Engineering, July 6--12 1997, ICCE/4, Hawaii, Ed. David Hui, 147--148.

Publisher Information

  • Prepared for the Wolfram Data Repository By: Gosia Konwerska
    (Wolfram Research, Inc.)
  • Publisher of Record: Gosia Konwerska