小编Lay*_*yla的帖子

我想在R中逐行读取一个文本文件,使用for循环和文件的长度.问题是它只打印字符(0).这是代码:

fileName="up_down.txt"
con=file(fileName,open="r")
line=readLines(con) 
long=length(line)
for (i in 1:long){
    linn=readLines(con,1)
    print(linn)
}
close(con)

我想用C创建一个结构,初始值如下:

typedef struct {
    int id = 0;
    char *name = "none";
} employee;

我知道以上是不可能的,有没有其他方法可以做到这一点？

我有这样一个文件的名称:name1.csv我想提取这个字符串的两个子串.一个存储name1一个变量,另一个存储扩展csv,而不存在另一个变量中的点.

我一直在寻找是否有类似indexOfJava 的功能允许进行那种操作,但我还没有找到任何东西.

有帮助吗？

可能重复:
自动删除R中的文件/文件夹

我想知道在R中是否有办法检查文件是否在我当前的目录中,如果它在那里,那么程序会删除它吗？

我知道其他语言可以直接访问操作系统功能来执行此任务,但如果R具有该功能,我会有点怀疑.

我在R中有一个列表,其中包含以下元素:

[[812]]
[1] ""             "668"          "12345_s_at" "667"          "4.899777748" 
[6] "49.53333333"  "10.10930207"  "1.598228663"  "5.087437057" 

[[813]]
[1] ""            "376"         "6789_at"  "375"         "4.899655078"
[6] "136.3333333" "27.82508792" "2.20223398"  "5.087437057"

[[814]]
[1] ""             "19265"        "12351_s_at" "19264"        "4.897730912" 
[6] "889.3666667"  "181.5874908"  "1.846451572"  "5.087437057" 

我知道我可以使用类似于list_elem[[814]][3]我想要提取位置814的第三个元素的东西来访问它们.我需要提取所有列表的第三个元素,例如12345_s_at,我想将它们放在一个向量或列表中所以我可以稍后将其元素与另一个列表进行比较.以下是我的代码:

elem<-(c(listdata))
lp<-length(elem)
for (i in 1:lp)
{
    newlist<-c(listdata[[i]][3]) ###maybe to put in a vector
    print(newlist)
 }

当我打印结果时,我得到了第三个元素,但是像这样:

  [1] "1417365_a_at"
  [1] "1416336_s_at"
  [1] "1416044_at"
  [1] "1451201_s_at"

所以我不能用索引来遍历它们newlist[3],因为它会返回NA.我的错误在哪里？

我已经根据以下形式的一组twitters创建了一个数据帧:

 rdmTweets <- userTimeline("rdatamining", n=200)
 df <- do.call("rbind", lapply(rdmTweets, as.data.frame))

现在我用这种方式保存数据框:

 save(df, file="data")

如何加载保存的数据框以备将来使用？我用的时候:

  df2 <- load("data")

我应用dim(df2)它应该返回数据框有的推文数量,但它只显示1.

我想知道R中是否有任何指令可以清除所有初始化的变量并关闭所有打开的连接.就像某种复位功能一样.

我有以下代码:

DECLARE
   v_hire_date DATE:='30-Oct-2000';
   v_six_years BOOLEAN;  
BEGIN
IF MONTHS_BETWEEN(SYSDATE,v_fecha_contrato)/12 > 6 THEN
      v_six_years:=TRUE;
ELSE
      v_six_years:=FALSE;
END IF;
DBMS_OUTPUT.PUT_LINE('flag '||v_six_years);
END;

我想打印变量的值v_six_years,但我收到错误:

ORA-06550: line 10, column 24:
PLS-00306: wrong number or types of arguments in call to '||'
ORA-06550: line 10, column 3

如何打印变量的值v_six_years？

我已经尝试了mathematica代码,用于在这个地址中发布DNA序列的混沌游戏:http: //facstaff.unca.edu/mcmcclur/blog/GeneCGR.html

这是这样的:

genome = Import["c:\data\sequence.fasta", "Sequence"];
genome = StringReplace[ToString[genome], {"{" -> "", "}" -> ""}];
chars = StringCases[genome, "G" | "C" | "T" | "A"];
f[x_, "A"] := x/2;
f[x_, "T"] := x/2 + {1/2, 0};
f[x_, "G"] := x/2 + {1/2, 1/2};
f[x_, "C"] := x/2 + {0, 1/2};
pts = FoldList[f, {0.5, 0.5}, chars];
Graphics[{PointSize[Tiny], Point[pts]}]

我所拥有的fasta序列只是像AACCTTTGATCAAA这样的字母序列,要生成的图形如下:

代码适用于小序列,但是当我想要放置一个巨大的序列,例如几乎40Mb的染色体时,该程序需要花费大量时间并且只显示黑色方块,因此无法进行分析.是否有可能改进上述代码,以便显示它的方格会更大？,方式必须只是方形单位.感谢您的帮助

我有载体中包含的信息,例如:

sequence1<-seq(1:20)
sequence2<-seq(21:40)
...

我想将该数据附加到文件中,所以我使用:

write.table(sequence1,file="test.csv",sep=",",append=TRUE,row.names=FALSE,col.names=FALSE)
write.table(sequence2,file="test.csv",sep=",",append=TRUE,row.names=FALSE,col.names=FALSE)

但问题是,这是在一列中添加的,如:

1
2
3
...
21
22
...
40

我想在列中添加该数据,以便它最终如下:

1         21
2         22
3         23
...       ...
20        40

我怎么能用R做到这一点？