小编nac*_*cab的帖子

为什么我不能在ifelse()中使用element_text()?

为什么我不能返回element_text()

> ifelse(TRUE,element_text(size=20),element_text(size=10))
[[1]]
NULL
Run Code Online (Sandbox Code Playgroud)

但我可以这样做吗?

> element_text(size=20)
List of 8
 $ family    : NULL
 $ face      : NULL
 $ colour    : NULL
 $ size      : num 20
 $ hjust     : NULL
 $ vjust     : NULL
 $ angle     : NULL
 $ lineheight: NULL
 - attr(*, "class")= chr [1:2] "element" "element_text"
Run Code Online (Sandbox Code Playgroud)

r ggplot2

3
推荐指数
1
解决办法
258
查看次数

如何用分隔符拆分r中的字符串并丢弃最后两个项目?

我有一个字符串分隔_,我想摆脱最后两个元素.例如,从A_B_C_D我想要返回A_B,从A_B_C_D_E我想要A_B_C.我试图str_split_fixedstringr:

my_string <- "A_B_C_D"
x <- str_split_fixed(my_string,"_",3) 
Run Code Online (Sandbox Code Playgroud)

但它返回"A" "B" "C_D"的不是 "A_B" "C" "D",否则我可以做head(x,-2)来获得A_B

有没有比这更好的方法

paste(head(unlist(strsplit(my_string,"_")),-2),collapse="_")
Run Code Online (Sandbox Code Playgroud)

r stringr

3
推荐指数
1
解决办法
2765
查看次数

如何禁用zsh特殊变量(bang tilde!〜)?

我的zsh正在替换!~我之前运行的命令.这是一个问题,因为当我运行时awk '$1 !~ /abc/,它会替换!~命令.

有关如何禁用此功能的任何想法?这可能不是zsh的错,但是在谷歌搜索了一个小时而没有找到任何东西之后,我认为它是最有可能的候选人.

更新:

这只发生在!~换行符上时:

echo !~
# ~/bin/test_translate.rb

echo foo | awk '
$1 !~ /abc/'

awk: cmd. line:2:     $1 ~/bin/test_translate.rb /abc/
awk: cmd. line:2:                            ^ syntax error
awk: cmd. line:3:     $1 ~/bin/test_translate.rb /abc/
awk: cmd. line:3:                                     ^ unexpected newline or end of string
Run Code Online (Sandbox Code Playgroud)

更新2:

我已经把它缩小到我的这条线.zshrc:

source $ZSH/oh-my-zsh.sh
Run Code Online (Sandbox Code Playgroud)

我想知道在我访问的最后一个路径中选择zsh替换!~加空格键的选项,但我不想停止使用oh-my-zsh.我没有手动修改$ZSH/oh-my-zsh.sh.

zsh

2
推荐指数
1
解决办法
1000
查看次数

如何在zsh中使用带有功能的手表?

我想在watch调用中使用自定义函数。这是一个虚拟示例:

my_fun(){
    head -c2
}
echo hello | my_fun
# he
watch 'echo hello | my_fun'
# my_fun: command not found
Run Code Online (Sandbox Code Playgroud)

我怎么watch知道my_fun

zsh function watch

2
推荐指数
1
解决办法
2405
查看次数

如何在JS中使用行为委托(OLOO)定义私有变量?

我试图围绕对象链接其他对象来编写一个Node模块.这是我到目前为止(灵感来自这个答案):

'use strict'

// Composable prototype object
var parent = {
  publicVar: 1,
  doSomething() {
    return externalMethod(this.publicVar) + 10
  }
}

// Composable prototype object
var child = {
  doSomethingChild() {
    return this.publicVar + 20
  } 
}

// an external method
function externalMethod(arg) {
  return arg
}

// the parent factory
function Parent() {
  let privateVar = 2

  return Object.assign({
    getPrivate() {
      return privateVar
    }
  }, parent)
}

// the child factory
function Child() {
  let privateVar = …
Run Code Online (Sandbox Code Playgroud)

javascript ecmascript-6 stampit.js

2
推荐指数
1
解决办法
569
查看次数

Is there a simpler way to erase the end of the line using cat in R?

I like to do use this in my scripts:

cat("Saving...")
do_something_slow()
cat("\rSaved\n")
Run Code Online (Sandbox Code Playgroud)

The problem is that the carriage return is applied without erasing the rest of the line, so I get this:

Savedg...
Run Code Online (Sandbox Code Playgroud)

To fix it I can do:

cat("\rSaved\033[K\n")
Run Code Online (Sandbox Code Playgroud)

但它有点丑。有没有更简单的方法?

r

1
推荐指数
2
解决办法
253
查看次数

如何使用javascript关注符号链接?

我正在python -m SimpleHTTPServer 8888从目录运行my_server,我想访问index.html包含读取的javascript命令my_file.csv的文件,但该文件不在my_server其子文件夹或其中一个子文件夹中.

path/to/my_server $ ln -s /some_path/to/my_file.csv symbolic_link_to_my_file.csv
path/to/my_server $ python -m SimpleHTTPServer 8888
Run Code Online (Sandbox Code Playgroud)

如果我创建符号链接里面my_server指向my_file.csv,然后访问它像这样:

http://localhost:8888/my_server/index.html?file=symbolic_link_to_my_file.csv
Run Code Online (Sandbox Code Playgroud)

有什么办法我可以用javascript里面的这个符号链接index.html来阅读my_file.csv

<script>
    //read URL params
    ...
    d3.csv(file, ...)
</script>
Run Code Online (Sandbox Code Playgroud)

javascript simplehttpserver d3.js

1
推荐指数
1
解决办法
1989
查看次数

如何从R中的函数将对象加载到当前环境?

而不是做

a <- loadBigObject("a")
b <- loadBigObject("b")
Run Code Online (Sandbox Code Playgroud)

我想调用类似的函数

loadBigObjects(list("a","b"))
Run Code Online (Sandbox Code Playgroud)

并能够访问ab对象.

r

1
推荐指数
1
解决办法
962
查看次数

如何在gnu并行中分配变量?

我想在传递给的命令中分配一个变量parallel

parallel "my_variable={}_33; echo $my_variable" ::: a b c
Run Code Online (Sandbox Code Playgroud)

输出应为:

# a_33
# b_33
# c_33
Run Code Online (Sandbox Code Playgroud)

当然,这只是一个玩具示例。在真实的示例中,我想对该变量执行其他操作。

variable-assignment gnu-parallel

1
推荐指数
1
解决办法
1406
查看次数

如何在R中调用包含逗号的函数?

在R中使用S3或S4类时,通常将类设置为泛型my_generic,然后对每个子类型使用点my_generic.my_type.最近,我一直在看这种模式,但使用逗号代替句点my_generic,my_type.问题是我无法使用帮助操作符?或在控制台中输入函数名称,因为逗号被视为错误.有解决方法吗?我尝试过使用反引号,但它不起作用.

这方面的一个例子是包中的draw方法ComplexHeatmap:

methods(draw)
[1] draw.colorkey             draw.details       draw,HeatmapAnnotation-method 
[4] draw,HeatmapList-method draw,Heatmap-method      draw.key                      
draw,SingleAnnotation-method
Run Code Online (Sandbox Code Playgroud)

?draw.colorkey工作,但?draw,HeatmapAnnotation-method没有.

methods r s4

1
推荐指数
1
解决办法
113
查看次数

如何在不使用system()和sed的情况下从r变量中删除或插入子串?

我希望能够从现有的r变量中删除或插入任意子串.我当前的解决方案使用system(),但我确信有一种更简单,更优雅的方式:

> filename <- "remove_this_my_file.txt"
> (file <- system(paste("echo ", filename, "| sed 's/remove_this_\\(.*\\)/\\1/'",sep=""), intern=T))
[1] "my_file.txt"
Run Code Online (Sandbox Code Playgroud)

顺便说一句,这substr()是不好的,因为子字符串的位置可能因文件名而异.

regex r

0
推荐指数
1
解决办法
120
查看次数

如何访问javascript对象的多个属性?

如果我有阵列:

my_array = [{a:3,b:4,c:7},{a:5,b:8,c:6}]
property_names = ["a","c"]
Run Code Online (Sandbox Code Playgroud)

如何使用property_names数组对my_array获取以下输出?:

subset_array = [[3,7],[5,6]]
Run Code Online (Sandbox Code Playgroud)

javascript

-1
推荐指数
1
解决办法
3521
查看次数

如何使用CSS设置对话/对话的风格?

我正在尝试重现这样的内容,但是我不确定它叫什么:

在此处输入图片说明

我对标记很灵活,但可能是这样的:https : //codepen.io/nachocab/pen/LaBwzw

.container  {
  width: 600px;
 }
.speaker {
  padding-right: 20px;
}

.speaker::after {
  content: ':';
 }
Run Code Online (Sandbox Code Playgroud)
<div class="container">
  <p class="line">
    <span class="speaker">Mary</span><span class="sentence">Hello</span>
  </p>
  <p class="line">
    <span class="speaker">Luke</span><span class="sentence">Lorem ipsum dolor sit amet, consectetur adipiscing elit.
      Aenean fringilla pharetra metus id blandit.</span>
  </p>
</div>
Run Code Online (Sandbox Code Playgroud)

在此处输入图片说明

css

-1
推荐指数
1
解决办法
52
查看次数