我有一个txt格式的文件,由制表符分隔.我的问题是,如果它可以跳转到特定的行,但不使用for循环,例如,如果我想跳转到第二行,我已经这样做了:
fileName="table.txt"
con=file(fileName,open="r")
for (i in 1:2){
ctable<-readLines(con,n=1)
}
Run Code Online (Sandbox Code Playgroud)
但我不想使用for循环,我怎么能这样做?谢谢
我在名为"data.txt"的文件中有以下数据:
pid 1 2 4 15 18 20
1_at 100 200 89 189 299 788
2_at 8 78 33 89 90 99
3_xt 300 45 53 234 89 34
4_dx 49 34 88 8 9 15
Run Code Online (Sandbox Code Playgroud)
数据由制表符分隔.
现在我想在该表上提取一些列,根据名为"vector.csv"的csv文件的信息,该向量得到以下数据:
18,1,4,20
Run Code Online (Sandbox Code Playgroud)
所以我想结束一个修改过的文件"datamod.txt",用以下标签分隔:
pid 18 1 4 20
1_at 299 100 89 788
2_at 90 8 33 99
3_xt 89 300 53 34
4_dx 9 49 88 15
Run Code Online (Sandbox Code Playgroud)
在一些帮助下,我已经制作了以下代码:
fileName="vector.csv"
con=file(fileName,open="r")
controlfile<-readLines(con)
controls<-controlfile[1]
controlins<-controlfile[2]
test<-paste("pid",controlins,sep=",")
test2<-c(strsplit(test,","))
test3<-c(do.call("rbind",test2))
df<-read.table("data.txt",header=T,check.names=F)
CC <- sapply(df, class)
CC[!names(CC) …Run Code Online (Sandbox Code Playgroud) 我只是学习Python中的优先级队列,并且我已经制作了以下代码:
def main():
q=Queue.PriorityQueue()
while True:
n=input("numbre?")
if n==0:
break
else:
q.put(n)
print n
while not q.empty():
print q.get()
Run Code Online (Sandbox Code Playgroud)
当我输入数据时:9,1,4,5
它打印1,4,5,9这似乎是正确的,但我想知道如何以相反的顺序进行双击,我的意思是:9,5,4,1
我知道如何使用类,但在这种情况下,它似乎是以下额外的代码:
def __cmp__():
-cmp(q.get(),q.get())
Run Code Online (Sandbox Code Playgroud)
不起作用,有什么帮助吗?
如果元素在列表中,我使用匹配获取.例如我的列表是:
c("a","b","h","e"...) and so on
Run Code Online (Sandbox Code Playgroud)
如果我想查看元素h是否在列表中,我将以这种方式使用匹配:
if ("h" %in% v){do something}
Run Code Online (Sandbox Code Playgroud)
我怎样才能找到它在列表中找到元素的位置?谢谢
我有一个具有以下结构的txt文件:
NAME DATA1 DATA2
a 10 1,2,3
b 6 8,9
c 20 5,6,7 ,8
Run Code Online (Sandbox Code Playgroud)
第一行表示标题,数据由制表符分隔.我需要将DATA1列表或向量中的元素放在一个可以逐个遍历元素的方式中.
此外,我需要DATA2为每个元素提取元素NAME并将它们放在一个列表中,这样我就可以单独遍历,例如获取NAMEb 的元素8,9 并将其放入列表中.(请注意,第三个记录在列表中的空格和逗号DATA2之间7).
我怎么能做到这两个操作?我知道我可以使用read.table和$访问单个元素,但我被卡住了.
info<-read.table("table1", header=FALSE,sep="\t")
namelist<-list(info$NAME)
Run Code Online (Sandbox Code Playgroud) 版本1
char *cad1="hell";
char *cad2="home";
int j;
cad2=cad1;
for (j=0;j<4;j++){
printf("%c",cad1[j]);
}
cad2[0]='a';
for (j=0;j<4;j++){
printf("%c",cad2[j]);
}
Run Code Online (Sandbox Code Playgroud)
版本2
char cad1[]="hell";
char cad2[]="home";
int j;
cad2=cad1;
for (j=0;j<4;j++){
printf("%c",cad1[j]);
}
cad2[0]='a';
for (j=0;j<4;j++){
printf("%c",cad2[j]);
}
Run Code Online (Sandbox Code Playgroud)
版本3
char cad1[]="hell";
char *cad2="home";
int j;
cad2=cad1;
for (j=0;j<4;j++){
printf("%c",cad1[j]);
}
cad2[0]='a';
for (j=0;j<4;j++){
printf("%c",cad2[j]);
}
Run Code Online (Sandbox Code Playgroud)
我的问题是为什么版本1挂起了dev c ++ ?,版本2说在cad2 = cad1中有一个不兼容的赋值?为什么版本3工作正常?
曾经有一个名为knnflex的软件包用于语言R,但CRAN不再提供它.我有tar文件,但我如何在R下安装它?还有其他任何可以支持knn.dist或knn.predict的包吗?
我有一个大约4000行和100列的data.matrix.我正在做一个数据热图,如:
data<-heatmap(data_matrix,Rowv=NA,Colv=NA,col=cm.colors(256),scale="column",margins=c(5,10))
Run Code Online (Sandbox Code Playgroud)
但我得到的问题是列中出现的标签太过分组,因此无法正确显示它们.如何调整热图的大小以便我可以看到列标签的值?我尝试用pdf打印它,但它只显示黑色条纹.谢谢
我包括热图的图形,我想要看的部分是右边部分的标签,但它们太靠近了.

我在R中有以下说明:
y <- rep(1:2,each=3)
Run Code Online (Sandbox Code Playgroud)
我知道它生成了1和2的向量:
[1] 1 1 1 2 2 2
Run Code Online (Sandbox Code Playgroud)
如果我想从具有以下形式的csv行中提取该信息,我将如何获得相同的结果:
[1] ",,1,1,1,2,2,2"
Run Code Online (Sandbox Code Playgroud)
我尝试过as.numeric和is.na,我仍然得到一个空列表.有帮助吗?
r ×8
c ×1
csv ×1
file ×1
heatmap ×1
install ×1
line ×1
list ×1
match ×1
na ×1
python ×1
python-2.7 ×1
read.table ×1
string ×1
write.table ×1