Wolfram Computation Meets Knowledge

Depth of Field for Photographic Lens

Depth of field is the distance between the nearest and farthest objects in a scene that appear acceptably sharp in an image.

Depth of field equals the difference between the near and far limits of the depth of field. Both limits depend on the focal length, the focus distance, the circle of confusion and the f-number. Increased focal length slowly increases the depth of field, as do larger values for the circle of confusion and the f-number. Depth of field is directly proportional to focus distance.

Formula

{QuantityVariable["DoF", "Length"] == QuantityVariable[Subscript["D", "F"], "Length"] - QuantityVariable[Subscript["D", "N"], "Length"], QuantityVariable[Subscript["D", "F"], "Length"] == (QuantityVariable["f", "Length"]^2*QuantityVariable["s", "Length"])/(QuantityVariable["f", "Length"]^2 - QuantityVariable["c", "Length"]*QuantityVariable["N", "Unitless"]*(-QuantityVariable["f", "Length"] + QuantityVariable["s", "Length"])), QuantityVariable[Subscript["D", "N"], "Length"] == (QuantityVariable["f", "Length"]^2*QuantityVariable["s", "Length"])/(QuantityVariable["f", "Length"]^2 + QuantityVariable["c", "Length"]*QuantityVariable["N", "Unitless"]*(-QuantityVariable["f", "Length"] + QuantityVariable["s", "Length"]))}

symbol description physical quantity
DoF depth of field for photographic lens "Length"
DF far limit of depth of field "Length"
DN near limit of depth of field "Length"
f focal length "Length"
s focused distance "Length"
c circle of confusion "Length"
N f­number "Unitless"

Forms

Examples

Get the resource:

In[1]:=
ResourceObject["Depth of Field for Photographic Lens"]
Out[1]=

Get the formula:

In[2]:=
FormulaData[ResourceObject["Depth of Field for Photographic Lens"]]
Out[2]=

Use some values:

In[3]:=
FormulaData[
 ResourceObject[
  "Depth of Field for Photographic Lens"], {QuantityVariable[
   "c","Length"] -> Quantity[0.025`, "Millimeters"], 
  QuantityVariable[
\!\(\*SubscriptBox[\("D"\), \("N"\)]\),"Length"] -> 
   Quantity[10, "Meters"], 
  QuantityVariable["f","Length"] -> Quantity[100, "Millimeters"], 
  QuantityVariable[
\!\(\*SubscriptBox[\("D"\), \("F"\)]\),"Length"] -> 
   Quantity[15, "Meters"]}]
Out[3]=

Publisher Information