小编Jim*_* Bo的帖子

这是最初在这里提出的问题的重复:指示条形图中的统计上显着的差异但是要求R而不是python.

我的问题很简单.我想在R中生成条形图,如果可能的话使用ggplot2,指示不同条形之间的显着差异,例如生成这样的东西.我有一个搜索,但找不到另一个问题完全相同的问题.

我想写一个列表到文本文件,保留名称.

这类似于R:打印列表到文本文件,但是我想在每行的开头打印出名称:

> print(head(mylist,2))
$first
[1] 234984  10354  41175 932711 426928
$second
[1] 1693237   13462

mylist.txt
first   234984  10354  41175 932711 426928
second  1693237   13462

有任何想法吗？

非常感谢.

我想用ggplot2 geom_point创建一个点图,其中连续变量按不同因素分层.

这很复杂,也许我试图在一个图表中显示太多,但我有三个影响事物的不同因素

我想这样展示它

p <- ggplot(mtcars[,c(1,2,10,11)], aes(factor(cyl), mpg))
p + geom_point(aes(colour = factor(gear), shape=factor(carb)))

但是我想把因子(齿轮)分开,即对于x轴上的三个因子(cyl)值中的每一个,我想要x轴上不同因子(齿轮)颜色之间的小距离

即在因子(cyl)== 4中,因子(齿轮)== 3是3.9的类型,因子(齿轮)== 4是4,因子(齿轮)== 5是4.1的类型.对于每个因子(cyl)值重复这一过程.

希望有道理

NB这是一个玩具的例子.我会使用分类,非数字值而不是分解数字来做它; 我意识到3.9/4.1的值很令人困惑.

我有一个包含一些异常值的数据集,如下所示

x <- rnorm(1000,0,20)
x <- c(x, 500, -500)

如果我们在线性x轴刻度上绘制这个,我们看到

histogram(x)

我使用这个有用的线程编写了一个很好的方法将它放在对数刻度上: 如何在R中使用直方图的y轴的对数刻度？:

mat <- data.frame(x)
ggplot(ee, aes(x = xx)) + geom_histogram(colour="darkblue", size=1, fill="blue") + scale_x_log10()

但是,我希望第二个例子中的x轴标签与第一个例子的x轴标签相匹配,除了一种"负日志" - 即第一个标记(从中心向左移动)可以是-1,然后是接下来可能是-10,下一个-100,但都是等距的.那有意义吗？

我想删除具有给定名称的目录中的所有文件,但具有给定扩展名的文件除外.即我们有一个目录:

foo.txt foo.exe foo.jpg foo.png foo.something foo.somethingelse bar.jpg bar.exe

我想摆脱 foo.txt foo.jpg foo.png foo.something foo.somethingelse

但至关重要的是,我不想摆脱 foo.exe

这样做有一个简单的衬垫吗？

谢谢

想象一下,我们想要找到下面字符串中的所有FOO和后续数字并将它们作为向量返回(对于不可读性道歉,我想说明在FOO之前和之后没有规则模式):

xx <- "xasdrFOO1921ddjadFOO1234dakaFOO12345ndlslsFOO1643xasdf"

我们可以用它来找到其中一个(取自1)

gsub(".*(FOO[0-9]+).*", "\\1", xx)
[1] "FOO1643"

但是,我希望将所有这些作为向量返回.

我曾经想过使用strplit()和gregexpr()这样做的复杂方法 - 但我觉得有更好(更容易)的方法.