Explore frecuencias de magnitudes físicas en fórmulas 

Encuentre las magnitudes físicas más comunes en fórmulas que involucran tiempo.

In[1]:=

X formulas = FormulaLookup[All, RequiredPhysicalQuantities -> {"Time"}]; variables = Flatten[FormulaData[#, "QuantityVariables"] & /@ formulas]; quantities = Flatten[QuantityVariablePhysicalQuantity /@ variables]; data = SortBy[Tally[quantities], Last] // Reverse;

In[2]:=

X BarChart[data[[2 ;; 20, 2]], ChartLabels -> (Rotate[#, Pi/2] & /@ data[[2 ;; 20, 1]])]

Out[2]=