Arrays “的等价物”；数组“u push（）”；在R

我在R中有一个列表，由时间序列对象组成：

X<-list(a, b, c, ..., n)

---

X为了具体说明neal（我认为）的建议：

a=cumsum(rnorm(100))
b=cumsum(rnorm(200))
c=cumsum(rnorm(10))
d=cumsum(rnorm(50))

X=list(a=a,b=b,c=c,d=d)

createnewobjfun=function(x) sin(x)

Xnew=c(X,lapply(X, createnewobjfun ) )

然后检查X和Xnew的结构，看看它是否符合您的期望

> str(X)
List of 4
 $ a: num [1:100] 1.239 0.363 0.698 1.73 0.935 ...
 $ b: num [1:200] 1.94 2.41 4.18 2.21 3.35 ...
 $ c: num [1:10] 0.491 -0.273 -0.422 1.399 0.362 ...
 $ d: num [1:50] 0.465 1.828 1.595 0.976 -0.476 ...
> 
> str(Xnew)
List of 8
 $ a: num [1:100] 1.239 0.363 0.698 1.73 0.935 ...
 $ b: num [1:200] 1.94 2.41 4.18 2.21 3.35 ...
 $ c: num [1:10] 0.491 -0.273 -0.422 1.399 0.362 ...
 $ d: num [1:50] 0.465 1.828 1.595 0.976 -0.476 ...
 $ a: num [1:100] 0.946 0.355 0.643 0.987 0.804 ...
 $ b: num [1:200] 0.931 0.671 -0.861 0.805 -0.203 ...
 $ c: num [1:10] 0.472 -0.27 -0.41 0.985 0.354 ...
 $ d: num [1:50] 0.449 0.967 1 0.828 -0.458 ...

所以命名有一个问题，我认为可以在您的lappy调用中解决

我不知道您在步骤3中描述了什么。
这比
lappy（X，createNewObjectFunction）
更复杂吗？您是否可以更具体地说明您正在尝试做什么。使用
Xnew=c（X，new=lappy（X，createnewobjfun））
可以有效地区分名称。