我一直在考虑一个问题,但我不知道如何表达问题,甚至寻找它。如果你能解释给我听,我会非常感激的。
因此,我有一个具有以下格式的数据集:
10 6 4 4
10 6 4 4
7 6 4 4
我想进行一个成对的计算,为此我需要将每个元素一个一个地加到另一个元素上。即1与2,1与3,1与4,2与3,2与4,3与4。
我想在R中做一个嵌套的循环,我读到了这个循环,我就这样开始了:
for (i in 1:r-1) { ## r the number of columns
for (j in (i+1):r) {
....
}
我被困在这个阶段,我不知道如何用代码来表达我需要做的事情。很抱歉,我张贴了一个
在R中,如何使用apply、lapply、rapply、do.call等函数替换以下代码?
u <- 10:12
slist <- list()
for (i in 1:length(u)) {
p <- combn(u, i)
for (j in 1:ncol(p)) {
s <- paste(p[,j], collapse=",")
slist[[s]] <- 0
}
}
关于这一部分:
for (j in 1:ncol(p)) {
s <- paste(p[,j], collapse="
在R中,向量myvector包含几个向量,我可以将myvector中的所有向量相互比较,我想让myvector中的每两个向量都有交集。 a <- c(1,2,3,4)
b <- c(1,3,5,7,8,9)
d <- c(1,2,5,7,9)
e <- c(1,3,4,8,0,10)
f <- c(2,3)
myvector <- c(a,b,d,e,f) 简而言之,如何简化模式如下。 intersect1 <- intersect(a,b)
intersect2 <- intersect(a,d)
intersect3 <- inter
我有一个字符串ch,我希望得到一个特定的输出out。请参阅下面的例子。
ch <- "A B"
out <- "A B AB"
ch <- "A B C"
out <- "A B C AB BC AC ABC"
ch <- "A B C D"
out <- "A B C D AB BC CD AC AD BD ABC ABD ACD BCD ABCD"
基本上,我想得到所有可能的前进组合,的所有单词出现在一个字符串中,如上所述。
我如何在R中以最简单的方式实现
我是一个R新手,也许我的问题的解决方案很简单,但我现在还不能.我想逐列比较数据帧中的行。每一栏中的数据是一个字母(核苷酸基):
seq1 A C T G T
seq2 A C G G G
seq3 A G G C A
...
我想按列比较数据集中的所有行。我想要得到的结果是简单的1或0,在比较中为TRUE和FALSE,也是用表格的形式编写的。所以看起来是这样:
seq1_seq2 1 1 0 1 0
seq1_seq3 1 0 0 0 0
seq2_seq3 1 0 1 0 0
...
我在R方面的技能太低,写不出有用的东西。然而,我发现
ifelse(data[1,]==data[2,],
我在R中创建了一个相关矩阵,使用:
cor(df, use = "p")->df_corr
然后我用以下方法熔化了基体:
melt(df_corr) -> df_corr_melted
得到:
Var1 Var2 value
A B .1
A C .2
A A 1
B A .1
B C .4
B B 1
C A .2
C B .4
C C 1
我想去掉这对红发的。例如,我只需要corr(A,C),而不需要corr(C,A)。我阅读了dplyr中