如何更改此输入(使用序列:time,in,out,files):
Time In Out Files
1 2 3 4
2 3 4 5
Run Code Online (Sandbox Code Playgroud)
到这个输出(顺序:时间,输出,文件)?
Time Out In Files
1 3 2 4
2 4 3 5
Run Code Online (Sandbox Code Playgroud)
这是虚拟R数据:
table <- data.frame(Time=c(1,2), In=c(2,3), Out=c(3,4), Files=c(4,5))
table
## Time In Out Files
##1 1 2 3 4
##2 2 3 4 5
Run Code Online (Sandbox Code Playgroud) 我在R中读了一个表如下:
column1 column2
A B
Run Code Online (Sandbox Code Playgroud)
用于将两列匹配的命令是什么,如下所示?
Column 3
A_B
Run Code Online (Sandbox Code Playgroud) (1)我在R中读取了一个超过10000行和10列的大表.
(2)表格的第3栏包含医院的名称.其中一些是重复的甚至更多.
(3)我有一份医院名单,例如其中10个需要进一步研究.
(4)你能不能教我如何使用步骤3中列出的名称提取step1中的所有行?
这是我的输入文件的一个较短的例子;
Patients Treatment Hospital Response
1 A YYY Good
2 B YYY Dead
3 A ZZZ Good
4 A WWW Good
5 C UUU Dead
Run Code Online (Sandbox Code Playgroud)
我有一份我有兴趣进一步研究的医院名单,即YYY和UUU.如何使用R生成如下的输出表?
Patients Treatment Hospital Response
1 A YYY Good
2 B YYY Dead
5 C UUU Dead
Run Code Online (Sandbox Code Playgroud) 我通过以下步骤得到了一个距离矩阵:
x <- read.table(textConnection('
t0 t1 t2
aaa 0 1 0
bbb 1 0 1
ccc 1 1 1
ddd 1 1 0
' ), header=TRUE)
Run Code Online (Sandbox Code Playgroud)
因此x是具有列标题和行标题的数据框
t0 t1 t2
aaa 0 1 0
bbb 1 0 1
ccc 1 1 1
ddd 1 1 0
require(vegan)
d <- vegdist(x, method="jaccard")
Run Code Online (Sandbox Code Playgroud)
距离矩阵d如下获得:
aaa bbb ccc
bbb 1.0000000
ccc 0.6666667 0.3333333
ddd 0.5000000 0.6666667 0.3333333
Run Code Online (Sandbox Code Playgroud)
通过输入str(d),我发现它不是普通的表格,也不是csv格式.
Class 'dist' atomic [1:6] 1 0.667 0.5 0.333 0.667 ...
..- attr(*, "Size")= …Run Code Online (Sandbox Code Playgroud) 可能重复:
替换^和| 矩阵中的符号
在上一条消息(替换矩阵中的^和| sybmbols)中,讨论了删除列表中符号的方法.
在这里,我想只替换矩阵的一列(Column Drug).例如:
Patient Hospital Drug Response
111 AAA B+A Good
222 CCC B Good
333 DDD A+C Bad+relapse
Run Code Online (Sandbox Code Playgroud)
以下格式.
Patient Hospital Drug1 Drug2 Response
111 AAA B A Good
222 CCC B NA Good
333 DDD A C Bad+relapse
Run Code Online (Sandbox Code Playgroud)
使用R的方法是什么
输入表
Patients Hospital Drug Response
1 AAA a Good
1 AAA a Bad
2 BBB a Bad
3 CCC b Good
4 CCC c Bad
5 DDD e undefined
Run Code Online (Sandbox Code Playgroud)
输出文件
Patients Hospital Drug Response
1 AAA a 1
1 AAA a -1
2 BBB a -1
3 CCC b 1
4 CCC c -1
5 DDD e
Run Code Online (Sandbox Code Playgroud)
如何将一列中的3个文本替换为数字和空白?
"好在Reponse栏"到"1""在Reponse栏中不好"到"-1""在Reponse栏中未定义"到""
数据:
structure(list(Patients = c(1L, 1L, 2L, 3L, 4L, 5L), Hospital = structure(c(1L,
1L, 2L, 3L, 3L, 4L), .Label = c("AAA", "BBB", …Run Code Online (Sandbox Code Playgroud) 输入
row.no column2 column3 column4
1 bb ee up
2 bb ee down
3 bb ee up
4 bb yy down
5 bb zz up
Run Code Online (Sandbox Code Playgroud)
我有一个规则删除第1行和第2行和第3行,因为第1,2和3行的第2列和第3列是相同的,第4列中找到了矛盾的数据(up 和 down).
如何让R在column2和column3中删除具有相同名称的行,但是收缩第3列以生成矩阵,如下所示:
row.no column2 column3 column4
4 bb yy down
5 bb zz up
Run Code Online (Sandbox Code Playgroud) 我想用Tanimoto/Jacquard Score作为距离矩阵来计算R中数组中行的距离矩阵.
有可能吗?如果是的话,你能介意教我怎么做吗?
我的平台:Ubuntu linux工作站
在一个目录中,我有一系列文件,文件名为xxx_1.in到xxx_50.in
对于每个文件,我想将abc替换为def.如果我单独做,我应该输入:g/abc/s // def/g
如何编写脚本来一次处理所有文件?
在上一条消息中 按列名将表转换为矩阵
我想对csv表或R中的表使用相同的方法.你能不能教我如何修改第一个命令行?
x <- read.table(textConnection(' models cores time 4 1 0.000365 4 2 0.000259 4 3 0.000239 4 4 0.000220 8 1 0.000259 8 2 0.000249 8 3 0.000251 8 4 0.000258' ), header=TRUE)
library(reshape) cast(x, models ~ cores)
Run Code Online (Sandbox Code Playgroud)
我应该使用以下data.csv文件
x <- read.csv(textConnection("data.csv"), header=TRUE)
Run Code Online (Sandbox Code Playgroud)
我应该将以下内容用于名为xyz的R表
x <- xyz(textConnection(xyz), header=TRUE)
Run Code Online (Sandbox Code Playgroud)
是否必须使用textConnection来使用cast命令?
谢谢.