r语言经典实例
1、y0){x=1cat("x>=",x,"\n")}else{x=0cat("x>=",x,"\n")}}y(任意x值)“是正确的，我刚刚运算过了”
2、基本用法：
3、myfun("title2","data2")
4、其中，线型分为：
5、或者用sapply()来实现程序，具体如下：
6、type="s"#楼梯状:
7、type="h"#类似直方图的线:
8、type="c"#点线图去掉点:
9、ncol0<-function(x)dim(x)
10、x<-1:12;dim(x)<-c(3,4)
11、下面以一个例子来说明R语言编写自定义函数的过程。语言如下：
12、dim(x)
13、data<-read.table(B)
14、A,描述
15、r语言ROW函数用途：返回给定引用的行号。语法：ROW(reference)。参数：Reference为需要得到其行号的单元格或单元格区域。实例：公式“=ROW(A6)”返回6，如果在C5单元格中输入公式“=ROW()”，其计算结果为5一般常用来返回一定的序列号，常用于数组公式中。
16、C,dim()有一个方法为data.frames，它返回x的row.names的长度属性和x的（如行和列的数量分别）。
17、示例代码为：
18、layout(matrix(1:3,3,1))
19、具体如下：
20、R语言中，as.date函数返回日期格式，使用方法:as.date(x,"input_format")，其中x是字符型数据，input_format则是读入日期的适当格式，示例:as.date("2021年4月21日",format="%Y年%m月%d日")
21、我们上面的代码仅仅是将CSV数据导入了R语言，并没有将数据赋给R语言里的对象，下面的代码会将数据赋给对象Mydata：Mydata<-read.csv(file="C:\\Users\\HWT\\Desktop\\test.csv",header=F)
22、dim()函数使用
23、R对象，例如一个矩阵，阵列或数据帧。
24、plot(c(1:6),c(1:6),main="test",type="",xlim=c(0,7),ylim=c(0,7))
25、那么如何查看Mydata对象里的数据呢？直接输入Mydata就可以了：
26、plot(data&x,data&y,type="1")
27、接下来介绍导入txt文件的方法：原始txt数据中有a、b两列数据，并且它们以“;”号作为分隔符，则有：read.table(file="C:\\Users\\HWT\\Desktop\\test.txt",header=T,sep=";")
28、nrow和ncol的简单版本可以被定义如下:
29、myfun("title1","data1")
30、对于数组（并因此在特别是，对于矩阵）dim获取对象的dim属性。它是NULL或整数模式的向量。
r语言经典实例
31、检索和设置对象的范围
32、type="o"#覆盖式点和线:
33、dim(x)<-value（<-和等号的意思一样）
34、file<-c("data1.dat","data2.dat","data1.dat")
35、例如求1+2+3+4+……+99，可以直接使用公式=SUM(ROW(A1:A99))即可。注意是数组公式，输入完成后需要按下CTRL+SHift+回车三键结束。此公式中，其实利用了ROW生成一个数组从1到99。
36、type="p"#点:
37、type="l"#线:
38、B,用法
39、首先，以CSV格式的文件为例。假如我们要导入C:\Users\HWT\Desktop路径下的test.csv文件，则输入代码：read.csv(file="C:\\Users\\HWT\\Desktop\\test.csv")
40、title("A")
41、sapply(names,myfun,file
42、names<-c("title1","title2","title3")
43、这是一个自定义函数，可以用于上个经验
44、nrow0<-function(x)dim(x)
45、type="b"#点线:
46、假如分隔符是其他符号，例如百分号“%”，则代码修改为：read.table(file="C:\\Users\\HWT\\Desktop\\test.txt",header=T,sep="%")
47、myfun<-function(A,B){
48、默认情况下，R语言会认为第一行的是数据的标题，假如你的数据的第一行其实并不是标题，那么可以输入代码：read.csv(file="C:\\Users\\HWT\\Desktop\\test.csv",header=F)
49、type="S"#另一种楼梯状:
50、plot(x=x轴数据,y=y轴数据,main="标题",sub="子标题"，type="线型",xlab="x轴名称"，ylab="y轴名称"，xlim=c(x轴范围，x轴范围),ylim=c(y轴范围,y轴范围))
51、myfun("title13","data3")
52、type="n"#什么都没有: