如何将表达式(plotmath)放入下图的图例键标签中?
我知道如何在ggplot2中使用希腊符号?和其中的链接,但每当我使用scale_..._manual功能,我获得第二个传奇(见下文).
require(ggplot2)
require(reshape2)
require(plyr)
## parameters
d <- c(2, 5, 10, 20, 50, 100)
tau <- c("t1", "t2", "t3")
fam <- c("f1", "f2", "f3", "f4", "f5")
meth <- c("m1", "m2", "m3", "m4")
## lengths
nd <- length(d)
ntau <- length(tau)
nfam <- length(fam)
nmeth <- length(meth)
## build result array containing the measurements
arr <- array(rep(NA, nd*ntau*nfam*nmeth), dim=c(nd, ntau, nfam, nmeth),
dimnames=list(d=d, tau=tau, fam=fam, meth=meth))
for(i in 1:nd){
for(j in 1:ntau){
for(k in 1:nfam){
for(l …Run Code Online (Sandbox Code Playgroud) 我想在latex命令中添加一些正则表达式LaTeX-clean-intermediate-suffixes.我试过了
(setq LaTeX-clean-intermediate-suffixes
(append LaTeX-clean-intermediate-suffixes (list "\\.foo" "\\.bar")))
Run Code Online (Sandbox Code Playgroud)
但我收到以下警告:
Warning (initialization): An error occurred while loading `/Users/myusername/.emacs':
Symbol's value as variable is void: LaTeX-clean-intermediate-suffixes
To ensure normal operation, you should investigate and remove the
cause of the error in your initialization file. Start Emacs with
the `--debug-init' option to view a complete error backtrace.
Run Code Online (Sandbox Code Playgroud)
如何在此列表中附加一些字符串/后缀?
我在R中有一个列表列表.我想将它转换为列表数组,但我只得到一个列表列表数组:
r <- list(list(a=1, b=NULL, c=NULL, d=1.23),
list(a=2, b=NULL, c=NULL, d=3.32),
list(a=3, b=NULL, c=NULL, d=2.13),
list(a=4, b=NULL, c=NULL, d=3.25),
list(a=5, b=NULL, c=NULL, d=0.14),
list(a=6, b=NULL, c=NULL, d=5.13))
x <- array(r, dim=c(3,2))
x[1,1] # now a list of length 1 containing an element which is a list with components a--d
Run Code Online (Sandbox Code Playgroud)
如您所见,x[1,1](例如)现在是列表列表,但"外部"列表是无用的.我宁愿希望有一个数组y与y[i,j]为x[i,j][[1]].获得此功能的最佳方式是什么(使用base-R中的函数(无附加软件包))?
我试图使用一些unlist()hackery array(unlist(r, recursive=FALSE), dim=c(3,2)),但是失败了.sapply(r, FUN=I)至少给出一个矩阵......也许这有助于(?)
为什么下图不显示6 个面板中的数字(g; 指定通过textGrob(label=g)))?如果我只使用 text grob,这也有效,但是 text grob 和矩形 grob 似乎并不那么容易。不幸的是,帮助页面gtable_add_grob没有提供很多帮助...
require(gtable)
base <- gtable(widths=unit(rep(1, 2), "null"),
heights=unit(rep(1, 3), "null"))
g <- 1
for(i in 1:3) {
for(j in 1:2) {
base <- gtable_add_grob(base, list(rectGrob(gp=gpar(fill="#FF000088")), textGrob(label=g)), i, j)
g <- g+1
}
}
grid.draw(base)
Run Code Online (Sandbox Code Playgroud) 那应该很容易...如何i在下图中的标题中得到粗体的 (=1) (仅调整参数main)?
i <- 1
plot(0~0, main=substitute(bold("foo"~i.~"bar"), list(i.=i)))
Run Code Online (Sandbox Code Playgroud) 为什么linesGrob未在下图中绘制线(通孔)?
require(gtable)
base <- gtable(widths=unit(rep(1, 2), "null"),
heights=unit(rep(1, 3), "null"))
grid.newpage()
g <- 1
for(i in 1:3) {
for(j in 1:2) {
base <- gtable_add_grob(base,
grobs=list(linesGrob(x=1:4, y=4:1),
rectGrob(gp=gpar(fill="#FF0000")),
textGrob(label=g)), i, j, name=1:3)
g <- g+1
}
}
grid.draw(base)
Run Code Online (Sandbox Code Playgroud) 如何(有效/快速)确定C中矢量(元素)的排名(不是C++或使用非标准库)?例如,矢量的等级(ing)x=(0.25, 0.54, 0.38, 0.32, 0.49, 0.06, 0.41, 0.21, 0.98, 0.23)应该是rank(x)=(4, 9, 6, 5, 8, 1, 7, 2, 10, 3).
顾名思义,"排名"给出了向量的每个元素与向量的所有其他元素相关的等级.因此,rank(x[k])=l意味着k第th个元素x是l所有元素中的最小元素x(例如,k=6在上面的示例中,l为1,即,x的第6个元素是最小的).请注意,这样的函数rank()存在于其他几种编程语言中,但我还没有看到过C实现.我正在寻找的是一个纯C实现,它对整数或实数的向量尽可能快地工作.
我查看了各个地方,最后在Emacs中为"自动保存"模式提出了以下设置:
(defvar my-auto-save-folder (concat "~/.emacs.d/auto-save")); folder for auto-saves
(setq auto-save-list-file-prefix "~/.emacs.d/auto-save/.saves-"); set prefix for auto-saves
(setq auto-save-file-name-transforms `((".*", my-auto-save-folder t))); location for all auto-save files
(setq tramp-auto-save-directory my-auto-save-folder); auto-save tramp files in local directory
Run Code Online (Sandbox Code Playgroud)
经过几周的设置后,我访问了〜/ .emacs.d并发现文件夹〜/ .emacs.d/auto-save为空,而〜/ .emacs.d包含两个表单的自动保存文件#!home!<myusername>!<myfolder>!<myfile>.为什么自动保存文件没有存储在〜/ .emacs.d/auto-save中?[该文件夹auto-save有权利775,700 .emacs.d]
我有一个shell脚本,我想将其转换为可以包含在其中的函数.bashrc.除此之外#!/bin/bash,shell脚本包含以下函数的内容:
pdfMerge () {
## usage
if [ $# -lt 1 ]; then
echo "Usage: `basename $0` infile_1.pdf infile_2.pdf ... outfile.pdf"
exit 0
fi
## main
ARGS=("$@") # determine all arguments
outfile=${ARGS[-1]} # get the last argument
unset ARGS[${#ARGS[@]}-1] # drop it from the array
exec gs -dBATCH -dNOPAUSE -q -sDEVICE=pdfwrite -sOUTPUTFILE=$outfile "${ARGS[@]}" # call gs
}
Run Code Online (Sandbox Code Playgroud)
它已经运行并将给定的pdf文件与ghostscript结合起来.但是,shell在调用函数后总是退出(如果没有给出参数,也是如此).怎么解决这个问题?