楼主: 1124518271
685 0

[学习分享] R入门 数据整理 #学习日记# [推广有奖]

  • 0关注
  • 1粉丝

高中生

42%

还不是VIP/贵宾

-

威望
0
论坛币
912 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
239 点
帖子
13
精华
0
在线时间
19 小时
注册时间
2015-3-31
最后登录
2017-8-3

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
library(dplyr)
library(tidyr)
member <- data.frame(family=c(1,2,3), namef=c("a","b","c"), agef=c(30,40,50), namem=c("d","e","f"), agem=c(44,53,25))
member

a <- gather(member, key, value, namef:agem)
b <- separate(a, key, c("variable", "type"), -2)
new <- spread(b, variable,value)
new

new2 <- member %>%
  gather(key,value,namef:agem) %>%
  separate(key,c("variable","type"),-2) %>%
  spread(variable,value)
new2

filter(new, age>=30)
filter(new, type=="f")
filter(new2, type=="m")
select(new,type,age)

二维码

扫码加我 拉你入群

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

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

关键词:数据整理 Library Member BRARY dplyr

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-4-28 00:00