我有一个data.frame:
SelectVar
a b c d e f g h i j k l ll m n o p q r
1 Dxa8 Dxa8 0 Dxa8 Dxa8 0 Dxa8 Dxa8 0 0 0 0 0 0 0 0 0 Dxc8 0
2 Dxb8 Dxc8 0 Dxe8 Dxi8 0 tneg tpos 0 0 0 0 0 0 0 0 0 Dxi8 0
我想删除数据框中两行中零值的列,因此它产生如下数据框:
SelectVar
a b d e g h q
1 Dxa8 Dxa8 Dxa8 Dxa8 Dxa8 Dxa8 Dxc8
2 Dxb8 …我有以下数据框架
SelectVar
b c e f g h j
1 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2
2 Dxb2 Dxb2 Dxb2 Dxb2 Dxc2 Dxc2 Dxc2
3 Dxd2 Dxi2 tneg tpos Dxd2 Dxi2 tneg
在应用计数时我得到了
count(SelectVar)
b c e f g h j freq
1 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2 Dxa2 1
2 Dxb2 Dxb2 Dxb2 Dxb2 Dxc2 Dxc2 Dxc2 1
3 Dxd2 Dxi2 tneg tpos Dxd2 Dxi2 tneg 1
当我申请
计数(SelectVar == Dxa2)
b c e f g h …我的目标是将多个元素插入到一个向量中，每个元素位于不同的位置。这是一个例子，后面是一些不起作用的试验。
w <- c( 1,3,2,4,2,3,2,4,5,7,9,3,2,4,2,5,7,4,2 )
u <- c( 3,7,9,12 )
o <- c( 10 , 20 , 30 , 40 )
我试过了：
append ( w , o , after = u )
# which adds the series one time in the first location of after
fun <- function (x) append ( w , o[[x]] , after = u[[x]] )
lapply ( seq ( length ( u )) , fun )
# which adds one element to the list each …我有两个具有相同结构的列表.我想将它们组合起来以产生以下所需的输出.
A <- list(c(1,2,3,2,1,4),c(7,3,1,2,2,1),c(2,3,7,2,2,8))
B <- list(c(2,1,3,2),c(3,1,5,2),c(2,4,5,1))
# Desired Output
[[1]]
[1] 1 2 3 2 1 4
[1] 2 1 3 2
[[2]]
[1] 7 3 1 2 2 1
[1] 3 1 5 2
[[3]]
[1] 2 3 7 2 2 8
[1] 2 4 5 1
# I have tried with the items beloww and nothing works as to produce the shown desired output. Would you happen to know on how to combine the two vectors as …我一直在为建模问题做变量选择.
我使用了试验和错误来选择(添加/删除变量),减少了错误.然而,我遇到了挑战,因为变量的数量增加到数百个,手动变量选择无法执行,因为模型需要花费1/2小时来计算,从而无法完成任务.
您是否碰巧知道除跳跃包中的regsubsets之外的任何其他包(当使用相同的试验和错误变量进行测试时产生更高的错误,它不包括一些线性依赖的变量 - 排除一些有价值的变量).
我有一个具有正值和负值的平均值,并希望将负值和正值分开加起来.
如果我这样做,我加上具有正号的元素的数量,但不是具有正值的元素的值.
sum(x>0)
如何在向量中分别添加正值和负值
谢谢
这可能是一个简单的问题,但我无法找到如何从向量顺序生成值对,其中每对包括最后一个值和具有两列的值矩阵中的新值.以下示例
C<-c(1 , 20 , 44 , 62 , 64 , 89 , 91, 100)
矩阵的例子
newpairs
[,1] [,2]
[1,] 1 20
[2,] 20 44
[3,] 44 64
[4,] 64 89
[5,] 89 91
[6,] 91 100
因此,当我尝试矩阵时,它不起作用,因为最后一个元素没有用新元素重复
newpairs <- matrix(C, ncol=2, byrow=TRUE)
newpairs
[,1] [,2]
[1,] 1 20
[2,] 44 62
[3,] 64 89
[4,] 91 100
我想你可以进行子集,但如果C值发生变化,那么你必须改变掉落或保留子集.我也尝试过提取某些增量或可以提取每个第n个元素的函数.但是,我想找到一种系统的方法来创建第一个示例矩阵.
欢迎任何帮助
我有一个矢量,
x<-c(1,3,2,3,1,4,2,1,3,4,2,1,0,2,4,5,2,1,2)
我想通过从第一个元素到第10个元素开始每隔一次不包括一个x的向量来获得.这将包括元素(x的1,3,5,7和9)以获得(1,2,1,2,3).符合下面产生错误的表达式.
x[1:10,by=2]
谢谢