分类:全部列表
1、说明*,nkw表示命名关键字参数,是用户想输入的关键字参数名称,定义方式是在nkw前追加*,2、作用限制调用者传达的参数名称。3、实例#命名关键字参数defprint_info4(name,age=18,height=178,*,weight,**kwargs):'''打印信息函数4,加入命名关键字参数:paramname::paramage::paramheight::paramweight::paramkwargs::return:'''print('name:',name)print('age:',age)print('height:',he...
继续阅读 >
setwd("C:/Users/75377/Desktop/SHEEP_ROH")png("12.png",width=7000,height=5500,pointsize=170)par(mai=c(12,12,12,12),mgp=c(2.1,0.5,0))#地图数据下载http://cos.name/wp-content/uploads/2009/07/chinaprovinceborderdata_tar_gz.ziplibrary(maptools)x<-readShapePoly('bou2_4p.shp')plot(x,xlim=c(70,138),ylim=c(25,45),lwd=12,,panel.first=grid(lwd=10))axis(1,lwd=20,font=2,cex.axis=1.3...
继续阅读 >
可读性极低,而且其实也没必要用R语言写,图个乐罢了 p=c(0.4,0.2,0.2,0.1,0.1)###输入形如c(0.4,0.2,0.2,0.1,0.1)的概率向量,即每个待编码消息的发生概率p1=p###将概率向量另存,最后计算编码效率要用mazijuzhen=matrix(,nrow=length(p),ncol=length(p)-1)###码字矩阵:第i行对应向量p的第i个分量所对应的那个待编码消息的编码后的码字group=matrix(c(1:length(p),rep(NA,length(p)*(length(p)-1))),nrow=length(p),ncol=le...
继续阅读 >
tidyr>tdata<-data.frame(names=rownames(tdata),tdata)行名作为第一列>gather(tdata,key="Key",value="Value",cyl:disp,mpg)创key列和value列,cyl和disp放在一列中-号减去不需要转换的列>spread(gdata,key="Key",value="Value")根据value将key打散开与unite函数对立separate(df,col=x,into=c("A","B"))将数据框的列分割unite(x,col="AB",A,B,sep='.')dplyr>dplyr::filter(iris,Sepal.Length>7)条件过滤>dplyr::distinct(...
继续阅读 >