我已经尝试了许多方法来使用Rbg包来解开历史数据。我有一列150个股票代码，每个代码的日期范围为2010年1月1日至2015年6月30日。
我尝试使用Rbg手册中的示例：
t <- unstack(na.omit(FI_data), PX_LAST~ticker)
rownames(t) <- unique(na.omit(FI_data)$date)
t
当我运行上面的第二行时，我收到以下错误：
rownames<-错误(*tmp*，value=c("2010-01-01"，"2010-01-08"，"2010.01.15"，：尝试在没有维度的对象上设置"行名">
我也试过：
z <- read.zoo(FI_data, index.column = 'date', split = "PX_LAST")
并得到以下错误：
合并时出错。zoo(-0.293=c("GTCHF10Y Corp"，"GTCHF1Y Corp")，-0.179=c("GTCHF10Y Corp"，：序列不能与序列中的非唯一索引项合并此外：有50个或更多警告(使用warnings()查看前50个)样品：
dput(子集(FI_data[200:400，])结构(列表(ticker=c("LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LBUSOA指数"，"LBUSOAS指数"，"LUCRTREU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数"，"LUCRTREU指数"，"LUCRTRU指数")，日期=c("2013-10-25"，"2013-11-01"，"2013-11-08"2013-11-15"2013-11-22"2013-11-29"2013-12-06"，"2013-12-13"，"2013-12-20"，"201312-27"，"2014-01-03"，"2014-01-17"、"2014-01-24"、"201401-31"、"2014年02月7日"one_answers"2014年2月14日"，"2014-02-21"2014-02-28"2014-03-07"2014-03.14"2014-03/21"，"2014-03-28"2014-04-04"2014-04-11"2014-04.18"2014-03-25"，"2014-05-02"、"2014-05-09"、"201405-16"、"2014-2015-23"、"2014 05-30"，"2014-06-06"2014-06-13"2014-06.20"2014-05-27"2014-07-04"，"2014-07-11"2014-07-18"2014-07.25"2014-08-01"2014-08.08"，"2014-08-15"2014-08-22"2014-08.29"2014-09-05"2014-09-12"，"2014-09-19"2014-09-26"2014-10-03"2014-10-10"2014-10-15"，"2014-10-24"2014-10-31"2014-11-07"2014-11-14"201411-21"，"2014-11-28"2014-12-05"2014-12-12"2014-12-29"2014--126"，"2015-01-02"2015-01-09"2015-01-16"2015-01-23"2015-01:30"，"2015-02-06"、"2015-02-13"、"201502-20"、"2015.02-27"、"2015年03月06日"，"2015-03-13"、"2015-03-20"、"2015.03-27"、"2015年04月3日"、"2016年04月10日"，"2015-04-17"2015-04-24"2015-05-01"2015-05.08"2015-03-15"，"2015-05-22"2015-05-29"2015-06-05"2015-06.12"2015-03-19"，"2015-06-26"、"2015-07-03"、"2015年07月10日"、"2016年07月17日"one_answers"2015年7月24日"，"2010-01-01"、"2010-01-08"、"2010.01.15"、"2010-2011年01月22日"、"2010年01月29日"，"2010-02-05"、"2010-02-12"、"2010.02-19"、"2010-2011年02月26日"、"2010年03月05日"，"2010-03-12"、"2010-03-19"、"2010.03-26"、"2010-2011年04月02日"、"2010年04月09日"，"2010-04-16"、"2010-04-23"、"2010.04-30"、"2010-2011年5月07日"、"2010年5月14日"，"2010-05-21"2010-05-28"2010-06-04"2010-09-11"2010-07-18"，"2010-06-25"、"2010-07-02"、"2010.07-09"、"2010-2011年07月16日"、"2010年07月23日"，"2010-07-30"、"2010-08-06"、"2010.08-13"、"2010-2011年08月20日"、"2010年08月27日"，"2010-09-03"、"2010-09-10"、"2010.09-17"、"2010-2011年9月24日"、"2010年10月01日"，"2010-10-08"、"2010-10-15"、"2010.10-22"、"2010-2011年10月29日"、"2010年11月05日"，"2010-11-12"、"2010-11-19"、"2010-2011年11月26日"、"2010年12月03日"、，"2010-12-17"、"2010-12-24"、"2010.-12-31"、"2011-01-07"、"2011年01月14日"，"2011-01-21"，"2011-01-28"，"2011年02月04日"，"2012年02月11日"，"2011-02-25"，"2011-03-04"，"2011年03月11日"，"2012年03月18日"，"2011-04-01"、"2011-04-08"、"2011年4月15日"、"2012年4月22日"one_answers"2011年04月29日"，"2011-05-06"、"2011-05-13"、"2011年05月20日"、"2012年05月27日"one_answers"2011年06月03日"，"2011-06-10"、"2011-06-17"、"2011年06月24日"、"2012年07月01日"one_answers"2011年07月08日"，"2011-07-15"、"2011-07-22"、"2011年07月29日"、"2012年08月05日"one_answers"2011年08月12日"，"2011-08-19"，"2011-08-26"，"2011-09-02"，"201109-09"，"2011-09-16"，"2011-09-23"2011-09-30"2011-10-07"2011年10月14日"，"2011-10-28"，"2011-11-04"，"2011年11月11日"，"11月18日"，"2011-12-02"，"2011-12-09"，"2011年12月16日"，"2012年12月23日"，"2012-01-06"2012-01-13"2012-01-20"2012-01:27")，PX_LAST=c(0.5，0.51，0.51，0.49，0.48，0.50.48，0.47，0.46，0.45，0.44，0.44，0.44,0.45，0.47,0.45，0.45，0.44,0.44,0.43,0.46,0.43,0.44，0.42、0.43、0.42、0.45、0.41、0.4、0.42，0.4、0.38、0.39，0.360.380.370.39 0.4 0.4 0.41 0.43 0.43 0.42 0.42，0.41、0.41、.41、0.42、0.43、0.45、0.46、0.44、0.45、0.46，0.45,0.46,0.46,0.49,0.47,0.46,0.48,0.54,0.5,0.51，0.47,0.45，0.43,0.43,0.42,0.45，0.46,0.47,0.44,0.45，0.44,0.44,0.43,0.44,0.46,0.47,0.48,0.49,0.5,0.51，0.52、0.53、0.55、132.82、134.09、134.52、136.99、139.23、141.56，141.08、141.99、142.38、142.59、141.42、144.46、144.96、143.22，144.99、145.86、147.14、149.03、156.37、159.78、158.87、160.08，164.93、163.5、160.28、162.47、159.52、159.08、156.9、158.64，157.47、155.13、162.38、164.7、163.44、161.25、162.66、159.24，155.15、153.13、152.31、149.77、151.31、151.74、150.9、152.75，152.51、157.56、154.67、155.25、156.25、156.85、154.08、159.32，154.99、152.07、152.41、151.27、151.58、151.38、151.35、148.63，150.95、148.45、147.47、147.53、144.24、145.79、144.48、142.95，147.41、150.51、151.46、150.76、147.88、150.2、150.74、152.66，147.45、151.57、153.5、150.9、152.33、155.53、155.18、153.59，152.59、156.42、162.12、159.71、163.75、164.14、161.67、157.65，158.64、156.64、163.03、163.89、164.04、165.96、164.55、165.58，171.21、169.86、172.53、175.99、178.2、173.88、173.03)，.Names=c("ticker"，"date"，"PX_LAST")，row.names=200:400，class="data.frame")
我希望这个可复制的例子可以复制我遇到的问题。将这些数据重塑为一个更传统的数据框架似乎并不困难：我的目标是将日期作为行，将股票代码作为列。
您可以使用包tidyr:来完成此操作
library(tidyr)
FI_data %>% spread(ticker, PX_LAST)