0

したがって、長さが 114 のベクトルがあります。

p2<-c(28.00, 28.00, 28.00, 28.00, 28.00, 28.00, 28.37, 28.37, 28.37, 28.37, 28.37,
     28.37, 28.37, 28.37, 28.37, 28.37, 28.37, 28.37, 28.37,28.37, 28.37, 28.45,
     28.45, 28.45 ,28.45, 31.37, 31.37 ,31.37, 31.37, 31.37, 31.37, 31.37, 31.37,
     31.37, 31.37, 31.37, 31.37 ,31.37, 36.37, 36.37, 36.37 ,36.37, 38.00, 38.00,
     38.00, 38.00, 38.00, 38.00, 38.00, 38.00, 38.00, 38.00, 38.00, 38.00, 38.00,
     38.00 ,38.00, 38.00, 38.00 ,38.00, 38.00, 38.00, 38.00,38.00, 38.00, 38.00,
     38.00, 38.00, 38.00, 38.00, 38.37, 38.37, 38.37, 38.37, 38.37, 38.37, 38.37,
     38.37, 38.37, 38.37, 38.37, 38.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37,
     41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.37,
     41.37, 41.37, 41.37, 41.37, 41.37, 41.37, 41.3,7, 41.37, 41.37, 41.37, 41.37,
     41.37, 41.37, 41.37, 41.3)

レコード数の 2 つに切りたいと思います。カットを使用しようとしましたが、出力は同じ長さの間隔で定義されます:(28,34.7] (34.7,41.4]

それ、どうやったら出来るの？

4

3 に答える 3

1

これはあなたが望むものをあなたに与えますか？

library(Hmisc)
cut2(p2, g = 2)

From ?cut2: ...cuts指定されていない場合、x を分位グループに分割します (g指定された)

于 2013-11-08T11:20:41.580 に答える
1

あなたの特定のケースについて試してみてください

> set.seed(1)
> p2 <- runif(114, 28, 42)  # random data
> 
> ind <- 1:(length(p2)/2) # index for cutting the vector
> p2.1 <- p2[ind]         # first subvector
> p2.2 <- p2[-ind]        # second subvector
> 
> length(p2.1)            # length of first subvector
[1] 57
> length(p2.2)            # length of second subvector
[1] 57

それとも、このようなものですか？

> vec <- setNames(p2, cut(p2,2, labels=c("V1", "V2")))
> is.vector(vec)  # one vector 
[1] TRUE
于 2013-11-08T11:06:23.583 に答える