将行重新分配到R列

Question

我有以下数据框。

sample_data <- data.frame(Date = c ("2017-01-31", "2017-01-31","2017-02-28", "2017-01-31", "2017-03-31","2017-02-28", "2017-03-31", "2017-04-30", "2017-02-28","2017-03-31","2017-04-30","2017-04-30"), 
                  stock = c("c", "a", "a", "b", "a", "b", "b", "a", "c", "c", "b", "c"), 
                  Price = c(9,6,7,8,10,12,13, 11, 17, 12, 13, 14))

我希望重新安排这一点，以便将股票字母分配给一列，而不是全部都在第二列。所以数据框只显示每个股票的四个日期和4个价格（股票“a”将是一列，“b”是下一个等等）。

Answer 1

tidyr包提供了一种方法。

library(tidyr)
sample_data %>% 
 spread(stock, Price)