将大列（4137行）拆分并转置为与R中的行（196行，21列）长度相同的几行

我对R有问题

我创建了以下两个表

第1页：“长期战略回报事件窗口”

日期 相对日 每日退货收单机构 库西庇德 2011-03-14 -10 0 00187E203280 2011-03-15 -9 0 00187E203280 2011-03-16 -8 0.02400000 00187E203280 2011-03-17 -7 -0.02343750 00187E203280 .... .... .... .... .... .... .... .... 2011-04-07 8. -0.03488372 00187E203280 2011-04-08 9 -0.04953146 00187E203280 2011-04-11 10 -0.00422535 00187E203280 2016-01-15 -10 -0.01362530 0028241001499 2016-01-19 -9 -0.00271337 0028241001499 2016-01-20 -8 -0.01162503 0028241001499 2016-01-21 -7 -0.01201201 0028241001499 .... .... .... .... .... .... .... .... 除非我弄错了（可能是因为您没有在所需输出的shell中填写任何值），否则这只是一个

pivot\u-wider

，与输出shell中的行名称相加：

long_strategic_return_event_window %>% 
  select(-Date) %>% 
  pivot_wider(
    names_from=relative_day, 
    names_prefix="RR", 
    values_from=daily_return_acquirer
  ) %>% 
  add_column(
    `ROW NAME`=rownames(strategic_realizedreturn), 
    .before=1
  )

给予

# A tibble: 5 x 23
  `ROW NAME` CusipID  `RR-10`   `RR-9`   `RR-8`   `RR-7`   `RR-6`   `RR-5`   `RR-4`   `RR-3`   `RR-2`  `RR-1`      RR0      RR1      RR2      RR3      RR4      RR5     RR6      RR7
  <chr>      <chr>      <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>   <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>    <dbl>   <dbl>    <dbl>
1 00187E203… 00187E…  0        0        0.024   -0.0234  -0.00800  1.61e-2  0.0857  -0.00585  1.25e-1 0.0261  -0.0140  -0.0116   0.0458   1.88e-2 -0.0491   1.29e-2  0      -0.0140 
2 002824100… 002824… -0.0136  -0.00271 -0.0116  -0.0120   0.0139  -9.24e-3  0.0126   0.00772 -9.29e-2 0.0311   0.0159  -0.0148   0.00370 -2.63e-4 -0.0158   1.34e-3 -0.0123  0.00568
3 00287Y109… 00287Y… -0.00620  0.0159   0.00512  0.00484 -0.00329 -5.08e-4 -0.00509 -0.00818  9.41e-3 0.00562 -0.00419 -0.163    0.0350   2.94e-2  0.0389   9.35e-3  0.0113  0.00983
4 00430U103… 00430U…  0.00761 -0.00755  0.00457 -0.0212  -0.00929  4.69e-3 -0.0171  -0.0348   9.84e-3 0.0552   0.0785   0.00713 -0.00142  4.26e-3  0.00424 -2.95e-2  0.0159  0.00428
5 004498101… 004498…  0.00591  0.00486  0.0395  -0.00523  0.00331 -3.50e-3  0.0134   0.00596 -3.82e-4 0.0113   0.00227  0.00811  0.00243  7.47e-3  0.00222 -5.55e-4  0.0178  0.00309
# … with 3 more variables: RR8 <dbl>, RR9 <dbl>, RR10 <dbl>

#一个tible:5 x 23
`行名称`CusipID`RR-10``RR-9``RR-8``RR-7``RR-6``RR-5``RR-4``RR-3``RR-2``RR-1`RR0 RR1 RR2 RR3 RR4 RR5 RR6 RR7
1 00187E203…00187E…0 0.024-0.0234-0.00800 1.61e-2 0.0857-0.00585 1.25e-1 0.0261-0.0140-0.0116 0.0458 1.88e-2-0.0491 1.29e-2 0-0.0140
2002824100…002824…-0.0136-0.00271-0.0116-0.0120.0139-9.24e-30.0126 0.00772-9.29e-20.0311 0.0159-0.0148 0.00370-2.63e-4-0.0158 1.34e-3-0.0123 0.00568
00287Y109…00287Y…-0.00620 0.0159 0.00512 0.00484-0.00329-5.08e-4-0.00509-0.00818 9.41e-3 0.00562-0.00419-0.163 0.0350 2.94e-2 0.0389 9.35e-3 0.0113 0.00983
4 00430U103…00430U…0.00761-0.007550.00457-0.0212-0.00929 4.69e-3-0.0171-0.0348 9.84e-3 0.0552 0.0785 0.00713-0.00142 4.26e-3 0.00424-2.95e-2 0.0159 0.00428
004498101…004498…0.00591 0.00486 0.0395-0.00523 0.00331-3.50e-3 0.0134 0.00596-3.82e-4 0.0113 0.00227 0.00811 0.00243 7.47e-3 0.00222-5.55e-4 0.0178 0.00309
#…还有3个变量：RR8、RR9、RR10

---

不过，就我个人而言，我会为

R-10

等选择更加用户友好的列名。

Hello-这正是我想要的输出。但是，我想覆盖第2页上的“NAs”。这有可能吗？是的，有可能。除非我误解了您的意思，否则只需将代码的返回值指定为

strategic\u realizedreturn

。换句话说，

strategic\u实现了回报%…

。