# NOT RUN {
DAT_df_steps <- datsteps(DAT_df[1:100, ], stepsize = 25)
get.histogramscale(DAT_df_steps)
get.histogramscale(DAT_df_steps$DAT_step, binwidth = 20)
get.histogramscale(500, binwidth = 20)
# }
Run the code above in your browser using DataLab