小编Ser*_*.pv的帖子

我不能减少这个情节中的图例大小.有人可以帮帮我吗？我希望它看起来是正确的,但不超过绘图区域高度的20%

a <- c(3, 2, 2, 2, 1, 2 )
barplot(a, beside = T,
col = 1:6, space = c(0, 2))
legend("topright", legend = c("a", "b", "c", "d", "e", "f"), fill = 1:6, ncol = 2)

我正在尝试安装pysam.

在执行之后:

python path/to/pysam-master/setup.py build

产生此错误:

unable to execute 'x86_64-conda_cos6-linux-gnu-gcc': No such file or directory
error: command 'x86_64-conda_cos6-linux-gnu-gcc' failed with exit status 1

有类似的线程,但它们似乎都解决了问题assumig administriator权利,我没有.有办法安装所需的文件吗？

免责声明:这个问题来自我以前的一篇文章. 手动安装pysam错误:"ImportError:没有模块命名版本" 但是由于它可能需要不同的方法,我把它作为自己的问题.

我有这个数据框

set.seed(1234)
x <- rnorm(80, 5, 1)
df <- data.frame(groups = c(rep("group1",20),
                           rep("group2",20),
                           rep("group3",20),
                           rep("group4",20)),
                    value = x,
                    type = c(rep("A", 10),
                           rep("B", 10),
                           rep("A", 10),
                           rep("B", 10),
                           rep("A", 10),
                           rep("B", 10),
                           rep("A", 10),
                           rep("B", 10)))

我想把它描绘成小提琴情节,与狭窄的盒子图对齐并按照分组

变量类型:

ggplot(data = df, aes(x = groups, y = value, fill = type)) +
  geom_violin()+
    geom_boxplot(width=.1, outlier.colour=NA)

然而,箱形图并没有与大提琴图对齐,告诉ggplot做这样覆盖的缺失参数是什么？

谢谢!

我想把这三个维恩图放在一起.因此,当我打印它们时,它们出现在同一页面中

library(VennDiagram)
df1 <- data.frame(G1=sample(1:100, 10), G2=sample(1:100, 10), 
                  G3=sample(1:100, 10), G4=sample(1:100, 10))
venn.plot.df1 <- venn.diagram(x = as.list(df1), filename = NULL,
                            cat.col = c( "black",   "red",     "green3",  "blue" ),
                            fill=c("black",   "red",     "green3",  "blue"))
grid.draw(venn.plot.df1)

df2 <- data.frame(G1=sample(1:100, 10), G2=sample(1:100, 10), 
                  G3=sample(1:100, 10), G4=sample(1:100, 10))
venn.plot.df2 <- venn.diagram(x = as.list(df2), filename = NULL,
                              cat.col = c( "black",   "red",     "green3",  "blue" ),
                              fill=c("black",   "red",     "green3",  "blue"))
grid.draw(venn.plot.df2)

df3 <- data.frame(G1=sample(1:100, 10), G2=sample(1:100, 10), 
                  G3=sample(1:100, 10), G4=sample(1:100, 10))
venn.plot.df3 <- venn.diagram(x = as.list(df3), filename …

我试图从这个FTP获取文件

ftp://ftp.pride.ebi.ac.uk/pride/data/archive/2015/11/PXD000299/

从那里,我只需要以.dat扩展名开头的文件.但是还有其他我不感兴趣的文件.

我想避免一次下载每个,所以我想创建一个带有名称和循环的向量.

如何只下载我想要的文件？

谢谢

编辑:我尝试过以下操作

downloadURL <- "ftp://ftp.pride.ebi.ac.uk/pride/data/archive/2015/11/PXD000299/F010439.dat"
download.file(downloadURL, "F010439.dat") #this is a trial using one file

几秒钟后,我收到以下错误:

trying URL 

    'ftp://ftp.pride.ebi.ac.uk/pride/data/archive/2015/11/PXD000299/F010439.dat'
    Error in download.file(downloadURL, "F010439.dat") : 
      cannot open URL 'ftp://ftp.pride.ebi.ac.uk/pride/data/archive/2015/11/PXD000299/F010439.dat'
    In addition: Warning message:
    In download.file(downloadURL, "F010439.dat") :
      InternetOpenUrl failed: 'Die FTP-Sitzung wurde beendet.

'

鉴于这两个对象:

v <- "new.name"

w <- 1:10

我怎么能告诉我R将w重命名为new.name,所以我可以拥有它

  > new.name
 [1]  1  2  3  4  5  6  7  8  9 10

谢谢