Run »
Data_Cars <- mtcars median(Data_Cars$wt)
[1] 3.325