我使用ggplot2包在R中绘制了一个堆积条形图,
data<-read.table("K.txt",header=TRUE, sep="\t")
> data
Sample P1 P2 P3 P4
1 G1 0.02 0.01 0.03 0.95
2 G2 0.01 0.01 0.02 0.97
3 G3 0.01 0.01 0.02 0.97
4 G4 0.01 0.01 0.02 0.97
5 G5 0.01 0.01 0.02 0.96
6 G6 0.01 0.01 0.01 0.98
7 G7 0.05 0.01 0.01 0.93
8 G8 0.34 0.01 0.01 0.64
9 G9 0.43 0.01 0.01 0.56
> library("reshape2", lib.loc="C:/Program Files/R/R-2.15.2/library")
> data1<-melt(data)
Using Sample as id variables
> head(data1)
Sample variable value …这里,
> r<-c("AAandBB", "BBandCC")
> strsplit(as.character(r),'and')
[[1]]
[1] "AA" "BB"
[[2]]
[1] "BB" "CC"
运作良好,但是
> r<-c("AA|andBB", "BB|andCC")
> strsplit(as.character(r),'|and')
[[1]]
[1] "A" "A" "|" "" "B" "B"
[[2]]
[1] "B" "B" "|" "" "C" "C"
在这里,答案是不正确的.当我使用'|和'时,如何获得"AA"和"BB"？
提前致谢.
我们开发了一个闪亮的应用 它显示了一些警告信息,我们从不打扰它,因为应用程序运行正常.但是,我们无法分发应用程序,并在控制台中显示警告消息.现在我的问题是,当闪亮的应用程序运行时,如何在R控制台中抑制警告消息.
问题 1：我的 ui.R 代码：
fileInput('file1', h5('Choose input file: (Use only tab delimited text files)'),
accept=c('text', 'text-separated-values'))
和 server.R 代码
inFile <- input$file1
dat<-read.table(inFile$datapath, header=TRUE, sep="\t")
当我启动闪亮时，我得到，Error: 'file' must be a character string or connection。但是上传文件后，错误消失了。我想知道可能是什么问题？我很感激任何指示！
问题 2：如何在 Shiny 运行时抑制 R 控制台中的错误消息？
提前致谢
这里,
a<-c("Look at the sky", "Sun is bright", "cloudy day")
b<-c("sky", "day")
我想a基于的子集b.我的首选答案是:
"Look at the sky", "cloudy day"
在R中如何做到这一点？
这是我的df:
In[12]: df = pd.DataFrame(data = list("aabbcc"), columns = ["s"], index=range(11,17))
In[13]: df
Out[13]:
s
11 a
12 a
13 b
14 b
15 c
16 c
现在,根据索引值替换值:
In[14]: df.loc[11, "s"] = 'A'
In[15]: df
Out[15]:
s
11 A
12 a
13 b
14 b
15 c
16 c
In[16]: df.ix[12, "s"] = 'B'
In[17]: df
Out[17]:
s
11 A
12 B
13 b
14 b
15 c
16 c
是否可以基于位置而不是索引值执行相同的操作,类似于此,但它显示了ValueError(ValueError: Can only index by location with a [integer, …
我的问题与此非常相似，但我的列表中有字符串而不是整数。
我的python list：
list = ['a', 'b'] #number of items varies from 1 to 6
我想在 Postgres 查询中使用这个列表，如下所示
select * from sample where sub in ('a', 'b');
我可以使用tuple(list)get ('a', 'b')，当我的列表长度变成一时，这没有用。我正在努力寻找一种方法来转换
['a']为
我尝试过('a')
['a', 'b']的('a', 'b')
In[91]: myquery = "select * from sample where sub in (%s)" % ",".join(map(str,list))
In[92]: myquery
Out[92]: 'select * from sample where sub in (a,b,c)'
但 postgres 预计
select * from sample where sub in ('a', …我的熊猫df:
df = pd.DataFrame({'A':[1,2,3,4,5], 'B':['(AAAAA)2','(BCA)1','(CA)5','(DD)8','(ED)15']})
A B
0 1 (AAAAA)2
1 2 (BCA)1
2 3 (CA)5
3 4 (DD)8
4 5 (ED)15
我想删除父级和数字中的数字B
预期输出是:
A B
0 1 AAAAA
1 2 BCA
2 3 CA
3 4 DD
4 5 ED
到目前为止我试过,
df['B'] = df['B'].str.extract('([ABCDE])')
但我只得到:
A B
0 1 A
1 2 B
2 3 C
3 4 D
4 5 E
我在fasta文件中设置了EST序列.在这里,如何基于序列ID或名称进行子集化？
>gi|296783888|gb|GW992815.1|GW992815 UAS-Mi10 Complementary DNA of mulberry (Morus indica) Morus indica cDNA 5' similar to Putative phosphoribosyltransferase/phosphoribosylanthranilate-like gene from Morus indica, mRNA sequence
GCAGCCGTCGGATCGTGAGCGTGATCGCGTGGCTAGTCGGGTTGGCGAAATGGTTGGATGATATCCGGAG
GTGGAGGAACCCCATTACCACGGTATTGGTCCACATCTTATATTTAGTGCTTGTTTGGTACCCGGATTTG
ATTGTCCCAACCGGGTTTTTATATGTGTTCCTAATCGGTGTATGGTACTATCGGTTTCGGCCCAAGATAC
CAGCGGGTATGGATACCCGACTCTCACAAGCTGAAGCGGTTGACCCGGATGAGCTTGATGAGGAATTCGA
CACCATACCGAGCTCAAAACCACCCGACATAATCAGGGTCCGGTATGACCGGTTGCGGATATTGGCAGCC
CGGGTTCAAACGGTTTTGGGTGATTTTGCAACACAAGGGGAGCGGGTTCAGGCCTTGGTTAGCTGGAGGG
ACCCAAGGGCCACAAAATTGTTCATAGGCGTGTGCTTGGCCATAACAATAATTCTCTATGTGGTGCCACC
CAAAATGGTTGCCGTGGCACTTGGATTCTACTATTTACGACACCCCATGTTCCGAGACCCCATGCCTCCT
GCAAGCTTGAATTTCTTCAGAAGGCTTCCAAGCCTTTCAGACCGCTTTAATGTAGATTAGAATATTATAT
GATTATTAGTAGGCCCAA
>gi|296783887|gb|GW992814.1|GW992814 UAS-Mi9 Complementary DNA of mulberry (Morus indica) Morus indica cDNA 5' similar to Dehydration-responsive protein RD22, Similar to BURP domain-containing protein like gene from Morus indica, mRNA sequence
AAGCAGTGGTCTAGAACCAGAGTGGCCCCTGCGATGCAGGTATCATCTCTATTATCAAAAGGGATAAGGG
GTGGATCCGTCGGGGATTTGAGTCTCACATGGTCGCTGATAACTTATTGAATGGATATTGGATTGTGTGC
AGTGCGACCTAAACAGGATTGCCGTTGGGGCCTGTGGTCAGAGATACCCCACACTTCTCAACTCCCAAAT
TGGATCTTGTTCCTTGTTTTCCTGTATTAAGCCTGACCCCTGAGGCTTTCGCCACTGCCAACTGGGTGCC
GCCTGCTGACTTCTGATTCCCCGTGCTAACGGTTACTCCCGATTCCTTATCCACATCGAAGATGAACTAT
TGACTTCCGCAAACTCAAAAGGCTGCAAGATATCACTGACCGCTGTCGGGATCCGCGATCGGCATATACG
CGAAATCCGATCCCGGATCCCGGGACTGCAGACGGCTGAA
比如使用标题行>gi|296783888|gb|GW992815.1|GW992815 UAS-Mi10 Complementary DNA of mulberry (Morus indica) Morus indica …