※ 引述《clansoda (小笨)》之铭言： : 各位好，我这次碰到的问题是假设我有以下一个dataframe : 长毛象 山地 10 : 狐狸 山地 50 : 老虎 山地 60 : 猴子 山地 30 : 长毛象 雪地 25 : 狐狸 雪地 15 : 老虎 雪地 8 : 猴子 雪地 33 : 第一跟第二个column都是factor vector，第三个vector是numeric的格式 : 假设我想要做动物跟栖息地是否相关，我想弄成row是以动物作为分隔 : 而column是以栖息地作为分隔 : 做完应该会像是 : 雪地 山地 : 长毛象 : 狐狸 : 老虎 : 猴子 : 然後将值填入里面，我用table function可是里面没有可以填入值的arugment : 我之前看过reshape的melt function，试了很久也没成功，不知道有没有其他方法呢? library(data.table) library(magrittr) library(dplyr) library(tidyr) dat <- fread(' 长毛象 山地 10 狐狸 山地 50 老虎 山地 60 猴子 山地 30 长毛象 雪地 25 狐狸 雪地 15 老虎 雪地 8 猴子 雪地 33') dat %>% spread(V2, V3) # V1 山地 雪地 # 1: 老虎 60 8 # 2: 狐狸 50 15 # 3: 长毛象 10 25 # 4: 猴子 30 33 会有警告：id() is deprecated为正常，等待tidyr作者改版 (dplyr::id要被弃用了) (tidyr跟dplyr都是Hadley跟Rstudio的作品) -- R资料整理套件系列文： magrittr #1LhSWhpH (R_Language) http://tinyurl.com/1LhSWhpH data.table #1LhW7Tvj (R_Language) http://tinyurl.com/1LhW7Tvj dplyr(上) #1LhpJCfB (R_Language) http://tinyurl.com/1LhpJCfB dplyr(下) #1Lhw8b-s (R_Language) tidyr #1Liqls1R (R_Language) http://tinyurl.com/1Liqls1R --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 140.109.74.87 ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1458100380.A.0E6.html ※ 编辑: celestialgod (140.109.74.87), 03/16/2016 11:54:26