maurine的博客

#读文本数据 scan(file="测试数据.txt",skip = 1,what = double()) #读到数据框 claimfrm<-read.table(file="车险数据.txt",header = TRUE,sep =" ") str(claimfrm) names(claimfrm) head(claimfrm) #取消转换因子并且强制转换类型 ClaimData<-read.ta

#向量 (A<-c(1,2,3)) (B<-"abcD") (C<-TRUE) is.vector(B)#判断向量 is.logical(C)#判断逻辑 (a<-rep(1:3,each=2))#112233 (b<-rep(1:3,times=2))#123123 (c<-seq(from=1,to=10,by=2))#13579 (d<-seq(from=1,to=10,length=3)) e

firstfun {   result   return(result) } report1 report2 newdata #应用一：数据基本处理（车险数据） Des.Fun   Av   Sd   N   Sk   Ku   result   return(result) } ClaimData with(ClaimData,{   Des1   pr

##########数据可视化 win.graph()#手动创建一个图形设备，为当前图形设备 dev.cur()#显示当前图形设备编号 dev.list()#显示当前有几个打开的图形设备 dev.set(n)#指定编号为n的设备为当前图形设备 dev.off()#关闭当前 dev.off(n)#关闭编号为n的图形设备 #图形文件,后续图片将保存到指定格式的文件中 pdf("xx.pdf") win.