我有几个目录看起来像这样:
dir1/
|_foo.txt
|_bar.txt
dir2/
|_qux.txt
|_bar.txt
Run Code Online (Sandbox Code Playgroud)
对于每个目录,我想将其中的文件压缩为*.gz格式,然后删除未压缩的文件.所以最后我们希望得到这样的东西:
dir1/
|_foo.gz
|_bar.gz
dir2/
|_qux.gz
|_bar.gz
Run Code Online (Sandbox Code Playgroud)
有简单的Unix方法吗?
我是C++编程的新手.编译时我从不使用任何选项.
这是我的日常命令:
g++ MyCode.cc -o MyCode
Run Code Online (Sandbox Code Playgroud)
对于安全实践,最好的选择是什么?
我有以下数据:
Cubn 3.71455160837536 0.237454645363458
Gm9779 2.56051657980096 0.20850752817264
Apod 3.51796703048962 0.195999214485821
Run Code Online (Sandbox Code Playgroud)
我想要做的是创建'融化'数据,以便它给出这个
var1 var2 value
1 FOO Cubn 3.7145516
2 FOO Gm9779 2.5605166
3 FOO Apod 3.5179670
4 BAR Cubn 0.2374546
5 BAR Gm9779 0.2085075
6 BAR Apod 0.1959992
Run Code Online (Sandbox Code Playgroud)
但为什么这会失败?
library("reshape2");
dat <-read.table("http://dpaste.com/1446132/plain/",header=FALSE)
rownames(dat) <- dat[,1]
dat[,1] <- NULL
colnames(dat) <- c("FOO","BAR");
head(dat)
longData <- melt(dat);
head(longData)
Run Code Online (Sandbox Code Playgroud) 使用以下代码:
library(ggplot2)
ggplot(mtcars, aes(x=wt, y=mpg)) +
geom_point(aes(colour=factor(cyl))) +
geom_smooth(method="lm")
Run Code Online (Sandbox Code Playgroud)
我可以得到这个情节:

我的问题是灰色区域是如何定义的?这是什么意思.我怎样才能使用控制该频段宽度的各种参数?
为什么在Mac中编译C++总是创建*.dSYM目录?有没有办法禁用它?
使用此代码:
library(ggplot2)
p <- ggplot(mtcars, aes(wt, mpg))
p + geom_point()
p + geom_point() + geom_text(aes(wt, mpg, label=row.names(mtcars)))
Run Code Online (Sandbox Code Playgroud)
我得到这个图:

如何修改上面的代码,使其仅标记指向哪里wt > 4或mpg > 25,而其余的点保持未标记.
我有一个文件,其中包含我想用tar存档的文件列表.我们称之为mylist.txt
它包含:
/path1/path2/file1.txt
/path1/path2/file3.txt
...
/path1/path2/file10.txt
Run Code Online (Sandbox Code Playgroud)
我想要做的是将此文件存档到tarball中但不包括在内/path1/path2/.目前通过这样做:
tar -cvf allfiles.tar -T mylist.txt
Run Code Online (Sandbox Code Playgroud)
取消归档后保留路径.
我试过这个但是也不行:
tar -cvf -C /path1/path2 allfiles.tar -T mylist.txt
Run Code Online (Sandbox Code Playgroud)
它将所有文件归档到/path1/path2甚至不在mylist.txt中的文件
有办法吗?
我有两个这样的矢量
x <-c(1,2,3)
y <-c(100,200,300)
x_name <- "cond"
y_name <- "rating"
Run Code Online (Sandbox Code Playgroud)
我想像这样输出数据帧:
> print(df)
cond rating
1 x 1
2 x 2
3 x 3
4 y 100
5 y 200
6 y 300
Run Code Online (Sandbox Code Playgroud)
这样做的方法是什么?
我有一个看起来像这样的Makefile
CXX = g++ -O2 -Wall
all: code1 code2
code1: code1.cc utilities.cc
$(CXX) $^ -o $@
code2: code2.cc utilities.cc
$(CXX) $^ -o $@
Run Code Online (Sandbox Code Playgroud)
我接下来想要做的就是包含clean target所以每次运行make它都会自动删除现有的二进制文件,code1并code2在创建新文件之前.
我试图将这些行放在makefile的最后,但它不起作用
clean:
rm -f $@
echo Clean done
Run Code Online (Sandbox Code Playgroud)
什么是正确的方法呢?
我有一个使用此代码创建的数据框:
require(reshape2)
foo <- data.frame( abs( cbind(rnorm(3),rnorm(3, mean=.8),rnorm(3, mean=.9),rnorm(3, mean=1))))
qux <- data.frame( abs( cbind(rnorm(3),rnorm(3, mean=.3),rnorm(3, mean=.4),rnorm(1, mean=2))))
bar <- data.frame( abs( cbind(rnorm(3,mean=.4),rnorm(3, mean=.3),rnorm(3, mean=.9),rnorm(3, mean=1))))
colnames(foo) <- c("w","x","y","z")
colnames(qux) <- c("w","x","y","z")
colnames(bar) <- c("w","x","y","z")
rownames(foo) <- c("n","q","r")
rownames(qux) <- c("n","q","r")
rownames(bar) <- c("n","q","r")
foo <- cbind(ID=rownames(foo),foo)
bar <- cbind(ID=rownames(bar),qux)
qux <- cbind(ID=rownames(bar),qux)
foo$fn <- "foo"
qux$fn <- "qux"
bar$fn <- "bar"
alldf<-rbind(foo,qux,bar)
alldf.m <- melt(alldf)
Run Code Online (Sandbox Code Playgroud)
我想要做的是创建一个facet格式的ggplot线条曲线,所以它创建一个如下图形:

实际图形不包含向上线 - 这只是一个草图,因此线条分离是清晰的.
我当前的代码不起作用:
library(ggplot2)
p <- ggplot(data=alldf.m, aes(x=variable)) …Run Code Online (Sandbox Code Playgroud)