v.df_scan() 1: 10 2: 18 3: 4 4: 7 5: 14 6: 12 7: 6 8: 7 9: 6 10: 12 11: 13 12: 8 13: 7 14: 8 15: 11 16: 17 17: 5 18: 11 19: 21 20: 4 21: 19 22: 8 23: 8 24: 7 25: 17 26: 14 27: 10 28: 15 29: 20 30: 16 31: 12 32: 21 33: 4 34: 7 35: 14 36: v.df [1] 10 18 4 7 14 12 6 7 6 12 13 8 7 8 11 17 5 11 21 4 19 8 [23] 8 7 17 14 10 15 20 16 12 21 4 7 14 hst.v_hist(v.df,plot=F) hst.v br_c(3.5,6.5,9.5,12.5,15.5,18.5,21.5) hst.v_hist(v.df,breaks=br,plot=F) hst.v hist(v.df,breaks=br) n_length(br) n br[-n] br[-1] mid_0.5*(br[-n]+br[-1]) mid table(cut(v.df,br,mid)) stem(v.df) stem(v.df,,depth=T) stem(v.df,,-1,depth=T) educ_c("l","b","m","l","b","m","m","l","b","l","l","m","b","l") teduc_table(educ) teduc label.names_c("Bachelor","Lyceum", "Master") x_barplot(teduc,space=.5,angle=30,density=15,col=1,names=label.names) x text(x,teduc+1,teduc) x_barplot(teduc,space=.5,angle=30,density=15,col=1,names=label.names) x text(x,teduc+1,teduc) pie(teduc,names=label.names,explode=c(F,T,F), inner=1.1, rotate=F,angle=c(45,135,0),density=5) pie(teduc,names=label.names,explode=c(T,F,F), inner=2.1, rotate=T,angle=c(45,135,0),density=5) pie(teduc,names=label.names,explode=c(T,F,F), inner=0.5, rotate=F,angle=c(45,135,0),density=15)