Rでどのように複合言語オブジェクトを連結できますか？

Question

小さな式を連結してRで式を構築しようとしています。

> x = substitute({a;b;c}) 
> y = substitute({d;e;f}) 
> c(x,y) 
{ 
    a 
    b 
    c 
    d 
    e 
    f 
} 

を私はRでそれをしようとした場合、私はこれを取得：：Sの+の例では、私はこれを行うことができます

> c(x,y) 
[[1]] 
{ 
    a 
    b 
    c 
} 

[[2]] 
{ 
    d 
    e 
    f 
} 

が、私はこの別の方法でやるべきことを？

Answer 1

コメントはxとyはタイプ"expression"（Rによって使用される9つの基本的なベクトル型のいずれか）のオブジェクトではありませんというポイントを作ります。したがって、実際にはexpressionベクターであったとしても、c()を使用して組み合わせることはできません。

あなたが本当に（R言語の定義のthis sectionで「複合言語オブジェクト」と呼ばれている）クラス"{"のオブジェクトを結合したいならば、あなたはこのような何か行うことができます：あなたの場合は、次に

x <- substitute({a;b;c}) 
y <- substitute({d;e;f}) 
class(x) 
# [1] "{" 

as.call(c(as.symbol("{"), c(as.list(x)[-1], as.list(y)[-1]))) 
{ 
    a 
    b 
    c 
    d 
    e 
    f 
} 

を

myC <- function(...) { 
    ll <- list(...) 
    ll <- lapply(ll, function(X) as.list(X)[-1]) 
    ll <- do.call("c", ll) 
    as.call(c(as.symbol("{"), ll)) 
} 

# Try it out 
myC(x, y, y, y, x) 

Answer 2

私は1つの方法は、xとyの要素をつかむことだと思う。それは、常にx[1]がある場合になる「{}」、あなたができるので：

x[(length(x)+1):(length(x)+length(y)-1)] <- y[2:(length(y))] 

私はきれいな方法があります想像するけど。あなたは当分の間、あなたの質問に与えた例を無視

Answer 3

、今

x = expression(a,b,c) 
y = expression(d,e,f) 
c(x,y) 

、オブジェクトの種類を、あなたは連結しようとしていますか？ @バティストの答えに添付