小编max*_*eld的帖子

带有可变字体系列的geom_text图例

我想geom_text()根据变量让标签占用字体系列.根据ggplot2文档中的示例(向下滚动到底部),我已经这样做了(与ggplot docs示例中的相同):

library(ggplot2)
p <- ggplot(mtcars, aes(x=wt, y=mpg, label=rownames(mtcars)))
p + geom_text(aes(family=c("serif", "mono")[am+1]))
Run Code Online (Sandbox Code Playgroud)

产量:

在此输入图像描述

这一切都很好和花花公子 - 但我如何获得图例中的字体系列?

r ggplot2

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

拖动"侄子"可拖动到"阿姨"可放置,同时保持CSS和尺寸

我想拖动可拖动#red,嵌套在一些家长中,一些可放开#green,它坐落在div结构中的级别更高.

divs 的尺寸需要用percent(以便响应)来表达,并且顶层div必须是position: relative;,这可能会使事情变得更复杂.

为了比较,这一切都适用于更简单的情况,其中draggable #blue和droppable #green是兄弟元素,但在"侄子"场景(#redon #green)中断.

我明白我需要:

  • helper: clonenephew(#red)div,以及appendTo: "body",让我的侄子元素可以"逃脱"
  • 我还得到了我需要添加一些样式(尤其是position: relative;).ui-draggable-dragging,以便在运输过程中参考父元素计算侄子元素的尺寸.

到现在为止还挺好.

一个皱纹仍然存在:当侄子被拖动时,它会向侧面跳跃,并且不会掉落.

这里发生了什么?

  $(function() {
    $("#blue").draggable({
      snap: ".hexagon",
      snapMode: "inner",
      snapTolerance: 20,
      opacity: 0.7,
      addClasses: true,
      // stack: ".item",
      revert: "invalid"
    });
    $("#red").draggable({
      snap: ".hexagon",
      snapMode: "inner",
      snapTolerance: 20,
      opacity: 0.7,
      addClasses: true,
      // stack: ".item",
      revert: …
Run Code Online (Sandbox Code Playgroud)

css jquery css-position jquery-ui-draggable

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

加载ggplot2(颜色空间,实际上)打开x11

每当我加载时 ggplot2,X11就会跳起来(占用资源).

library(ggplot2)
Run Code Online (Sandbox Code Playgroud)

是我做什么,繁荣 - X11

问题是,我不想使用X11,也不想让它打开 - 我想在RStudio中使用Quartz和内置图形.

每当我关闭X11时,我的R会话也会如此.

我的设置:

  • OS X Yosemite 10.10.2
  • R 3.1.2
  • 平台:x86_64-apple-darwin13.4.0(64位)
  • ggplot 1.0.0
  • XQuartz 2.7.7(xorg-server 1.15.2)
  • OS X最近(昨天?)将命令行工具更新为6.2

出现此问题:

  • 在RStudio
  • 使用ST3 REPL包
  • R控制台

我怎么搞砸了,我怎么能阻止这种疯狂呢?

更新:结果(见注释),版本1.2-5中的包颜色空间有问题,而不是ggplot2.

更新:问题似乎从色彩空间版本1.2-6解决.

x11 r color-space ggplot2

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

如何简化R中的角度(以度为单位)?

我正在构建手动/副手/判断因子旋转功能.

显然,旋转二维坐标系270°与其相同-90°且720°相同0°.

我想简化用户输入,使所有值都在-180°和之间180°.

我怎样才能在R中优雅地做到这一点?

Ps.:或者将值存储0°到更有意义360°?用户可能要旋转时钟-和逆时针,所以我觉得-180到180可能是从一个UX点更直观.

trigonometry r degrees

5
推荐指数
2
解决办法
1058
查看次数

如何为bookdown :: tufte_book2()设置双重,对称布局

我正在使用奇妙的新bookdown包装,就在Yihui的样板上,使用bookdown::tufte_book2()输出.

结果很可爱,但我希望页面是对称的,所以页边距总是在双面书的外面.

我明白,原来塔夫特乳胶包装 提出了这样通过简单的设置:

\documentclass[twoside,symmetric]{tufte-book}
Run Code Online (Sandbox Code Playgroud)

我在哪里将其插入我的bookdown项目?

我试过把它添加到preamble.tex,但是没有做任何事情.


Ps.:请不要对我说这是LaTeX问题; 它真的不是.这是一个rmarkdown/ bookdown问题恰好输出胶乳.

Pps.:我有没有提到Yihui的书籍包装是如何美妙而美丽的?(学术)(〜书呆子)出版的未来与我们同在!

latex r r-markdown tufte bookdown

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

递归 purrr::modify_depth() 不适用于参差不齐的列表

说,这是我有点复杂和参差不齐的清单:

res <- list(
  a = TRUE,
  b = "error msg 1",
  c = list(
    TRUE,
    "error msg 2"
  ),
  d = list(
    e = "error msg 3",
    "error msg 4",  # no name for this list item just to make things interesting
    f = list(
      g = list(
        h = "error msg 5",
        i = TRUE
      )
    )
  )
)
Run Code Online (Sandbox Code Playgroud)

我现在想说,在2 深度(从顶部)应用一些函数。我的清单可以任意深入和参差不齐。

我想变得很酷和整洁,所以我认为这会奏效:

purrr::modify_depth(.x = res, .depth = 2, .f = str, .ragged = TRUE)
Run Code Online (Sandbox Code Playgroud)

但是,出乎意料的是,失败了

Error …
Run Code Online (Sandbox Code Playgroud)

recursion r list purrr tidyverse

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

/github/home 是否在 github 操作之间持续存在?

到目前为止,根据文件系统文档,我的印象是(仅?)/github/workspace在操作(而不是工作流程)中持续存在:

Docker 容器的工作目录。GitHub Actions 在此目录中执行。该目录的路径在GITHUB_WORKSPACE环境变量中设置。

(...)

操作可以修改此目录的内容,后续操作可以访问该内容。

但我现在有一个reprex(带有操作运行的实时存储库),显示它/github/home似乎也跨操作持续存在。

当然,我知道这些都不会在工作流程或运行中持续存在。就在行动之间。

文档(对我来说)对此有点不清楚,而且我还没有得到支持人员的答复。

从第一个操作开始记录/github/home:

Running 'touch /github/home/foo'...
Successfully ran 'touch /github/home/foo'
Run Code Online (Sandbox Code Playgroud)

从第二个操作记录/github/home:

Running 'ls /github/home'...
foo
Successfully ran 'ls /github/home'
Running 'rm /github/home/foo'...
Successfully ran 'rm /github/home/foo'
Run Code Online (Sandbox Code Playgroud)

这似乎表明这一点确实/github/home也持续存在,但我想确切地知道。

github github-actions

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

在函数内部时,ggplot2的aes_string()不喜欢“ rownames(mtcars)”

我需要依靠来在函数内部生成图aes_string(),并且需要标签作为行名。

下面的图表可以正常工作,但不能在函数内部使用。

library(ggplot2)
data(mtcars)
plotfun <- function(cars) {
  g <- ggplot(data = cars, aes_string(x = "mpg", y = "disp", label = "rownames(cars)"))
  g <- g + geom_point()
  g <- g + geom_text()
  g
}
plotfun(cars = mtcars)
Run Code Online (Sandbox Code Playgroud)

当作为函数运行时,这使我:

Error: Aesthetics must either be length one, or the same length as the dataProblems:mpg, disp
Run Code Online (Sandbox Code Playgroud)

我不能把头缠住它。我知道关于函数内部存在很多类似的问题aes_string() –我只是无法使其解决方案适应我的问题。

附言:显然,以上MWE很愚蠢;在我的实际用例中,我通过for循环运行该图,因此需要使用aes_string()。

r ggplot2

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

如何为 bookdown / rmarkdown 网站重新缩放本地图像?

我的*.jpegbookdown 项目(或 rmarkdown 网站,我认为并不重要)中有一个相当大的(~ 14MB)。这是一个外部的静态图像,尚未被 R 触及(到目前为止)。

我这样称呼图片:

```{r q-pic, echo=FALSE, out.width="100%", fig.cap="Q-Sorting during the 2016 CiviCon", dpi = 72}
include_graphics(path = "img/q-sorting3.jpg")
```
Run Code Online (Sandbox Code Playgroud)

我还通过opts_knit$set(fig.retina = 2).

我真的不在乎 PDF 有多大,但很明显,网站上大约 14MB 的图像非常糟糕。

有没有办法让knitr() rmarkdown() bookdown()工具链的某些元素可以自动将图像重新缩放到指定的适当分辨率?

我天真地假设,如果两者 out.width并dpi指定了,该图像将被重定(即:较小的文件大小)窗帘后面,但是,要么似乎并非如此,或者我使用它错了。

Ps.:我知道有可能指定 adpi然后knitr找出合适的大小;那不是我关心的。我想,有点,相反。

jpeg r knitr r-markdown bookdown

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