我搜索了多个网站，虽然这个问题并不那么难（我猜），但我找不到答案。
我有一个包含产品代码的数据框（每个月都在增长），并希望为它们提供一个月和年的标签：
date <- seq(as.Date("2013-01-01"), by = "month", length.out = 48)
将此monthYear（所有48个“月 - 月”组合）应用于此data.frame的每一行：
codes <- c("UIW786", "1UJ928", "JSNK928", "PEO9208", "NejU78")
codes2 <- c("34", "15", "166", "184", "3316")
codesDF <- data.frame(codes, codes2)
所以我最终得到48 * 5行：
34 UIW786 2013-01-01
34 UIW786 2013-01-02
34 UIW786 2013-01-03
....
3316 NejU78 2016-11-01
3316 NejU78 2016-12-01
我想在codesDF中重复48次，然后cbind重复每个值，但是当新代码出现时，我需要这样的内容：
for(i in 1:nrow(codesDF) {...}
这就是我被困住的地方。
希望有人可以帮助我。提前致谢