求教R的数据处理与画折线图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

刚刚学习R，数据的导入与处理有点搞不定阿。请教，最好有个完整的步骤，特别是数据导入的部分，谢谢各位了。
数据在附件里。或者是这样的数据
                                               

18,560659,438635,439605,436646,350664,466375,498993,458194
19,752536,535457,581511,473360,577922,665839,585980,483816
20,570713,514082,411263,387874,628021,662924,608114,494113
21,468345,418497,366175,348070,253872,408090,868413,386665
22,458815,359413,302825,321161,230916,349307,652934,332837
23,361201,341414,266964,278498,227693,344529,652201,303239
24,609521,1039840,805840,625307,645599,1099804,3238543,1052723
25,333044,302599,240930,251629,250741,321438,597120,284928
26,338359,241065,199919,217520,208605,256147,409243,210400
27,351468,258655,206415,238704,227130,286369,408701,245484
28,334704,234759,190482,221225,228688,270822,352223,219315
29,263227,215144,159288,187530,191739,242268,291024,195212
30,243992,213403,156328,209182,209397,257570,242314,219254
31,184945,190687,151887,194727,200883,231879,179634,199860
32,242711,250269,202845,335585,241600,310658,152172,220300
33,869083,1347823,438439,1100870,1039664,1164393,2223789,1810844
34,13001,17144,20632,18902,30045,20522,10465,17993
35,24731,37869,28121,45091,42713,28875,16586,23288
36,1977505,1893349,1698708,2289757,2614393,2803668,924598,2036282

  画折线图，横坐标是（18：36）

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏3 回帖

关键词：数据处理 折线图 数据导入 横坐标 最好 数据分析专题 数据处理 数据分析软件 数据分析报告 面板数据分析 excel数据分析 数据分析方法 项目数据分析

实在没忍住，还是stata吧，
line v9 v8 v7 v6 v5 v4 v3 v2 v1,legend(ring(0) pos(10) cols(1) region(lcolor(white)))
下面是在R中实现的指令：
a<-read.table("x.txt",sep=",")
plot(a$V1,a$V2,type="n",xlab="V1",ylab="",ylim=c(0,max(a)))
for(i in 2:9){
        lines(a[,1],a[,i],col=i,lty=i-1)
}
legend("topleft",dimnames(a)[[2]],col=2:9,lty=1:8,box.col="white")

#转换为文本， 再拆分，变矩阵
a <- read.csv("Clean2.txt",header=F)  
a <- as.character(a[,1])
a <- unlist(strsplit(a,split=","))
a <- as.numeric(a)
a <- matrix(a,ncol=9,byrow=T)
colnames(a)<-paste(c("x",1:8))
matplot(a[,1],a[,2:9],type="l",lwd=1,col=c(1:6,8:9),xlab="x",ylab="y")
legend(20,3000000,colnames(a)[-1],col=c(1:6,8:9),lwd=1)

jmpamao 发表于 2012-12-29 14:18
#小小抱怨下，楼主拿的 什么类型的数据。要转换为文本， 再拆分，变矩阵
a

正解

trier2006 发表于 2012-12-29 14:27
正解

您好，这是二代测序的数据（生物），本来这些数据和作图都是公司给做好了，但是我们导师想让我学习，我买了r语言初学者指南，这本书，也把数据弄成txt格式的了，但是读取之后和书上不一样

你给的excel 中 ，为什么一行的数据，只放在一个单元格呢？

jmpamao 发表于 2012-12-29 16:53
你给的excel 中 ，为什么一行的数据，只放在一个单元格呢？

保存数据选择的是“，”分隔符来保存的，可以通过导入的方式，打开就与正常的一样了

恩， 如果你导出的时候，比如csv,txt等都可以，都能够方便R 读写
而你的附件中，那个xls中的数据，就不便R 直接分析

monstersivle 发表于 2012-12-29 12:50
实在没忍住，还是stata吧，
line v9 v8 v7 v6 v5 v4 v3 v2 v1,legend(ring(0) pos(10) cols(1) region(lco ...

为什么我输入了，显示：错误于plot(aV1, aV2, type = "n", xlab = "V1", ylab = "", ylim = c(0,  :   找不到对象'aV1'

shadowdubbb 发表于 2015-4-22 19:35
为什么我输入了，显示：错误于plot(aV1, aV2, type = "n", xlab = "V1", ylab = "", ylim = c(0,  :   找 ...

aV1,aV2指的是你存入数据a的变量V1,V2的名称，不是固定的公式