R读取一个数据框 Dataframe,删去其中的某一列

读取数据(txt文件,制表符分隔)

E盘的Rdata是存放数据的目录

 

> mydf <- read.table("E:/Rdata/myfile.txt", header=TRUE, sep="\t")

> mydf 回车

 

显示如下:

 

     T1 T2 T3 T3

 AA   8    6

 AB   3  7   2

 AC   2  6  1  0

 AD   3  4  7  8

...

 

> mydf <- subset(mydf, select = -X )

这样就删除了 X 这一列

 

> mydf 回车

 

显示如下:

 

    T1 T2 T3 T3

      6

    7   2

   2  6  1  0

   3  4  7  8

...

 

其它命令:

> mydataframe <- data.frame(a=1:3, d=2:4, c=3:5, b=4:6)
> mydataframe
  a d c b
1 1 2 3 4
2 2 3 4 5
3 3 4 5 6

如果用以下命令读取myfile.txt (结果是没有了X,T1,T2,T3,T4,而且作为矩阵读入)

> df1 <- unname(as.matrix(read.table("E:/Rdata/myfile.txt", row.names=NULL,header=T, sep="\t")))

 

> df1

        [,1]    [,2] [,3] [,4] [,5]
   [1,] "AA"    "8"  "5"  "4"  "6"
   [2,] "AB"    "3"  "7"  "9"  "2"
   [3,] "AC"    "2"  "6"  "1"  "0"
   [4,] "AD"    "3"  "4"  "7"  "8"

   ......

 

参考—— http://stackoverflow.com/questions/6286313/remove-an-entire-column-from-a-data-frame-in-r




转载自:http://blog.sina.com.cn/s/blog_80572f5d0101anxw.html




  • 6
    点赞
  • 18
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值