我正在尝试将离散标签添加到ggplot2具有连续比例的图中.虽然有许多问题使用stat_function(即关于绘制多个函数)以及许多关于如何使用不同尺度的问题,但我无法理解如何在此特定实例中更改比例.
这是情节:
myfun1 <- function(x) (13.076-96.543)*x + (-44.056 +102.057)*x^2 + (17.856 -42.996)*x^3 + (-2.996 + 7.444)*x^4 + (0.190 -0.450)*x^5 + 100.088 + 75.215 # average vs. lowest
myfun2 <- function(x) 13.076*x -44.056*x^2 + 17.856*x^3 -2.996*x^4 + 0.190*x^5 + 100.088 # lowest
myfun3 <- function(x) (13.076-183.093)*x + (-44.056 +229.447)*x^2 + (17.856 -99.353)*x^3 + (-2.996 + 17.517)*x^4 + (0.190 -1.080)*x^5 + 100.088 + 67.115 # highest vs. lowest
df <- data.frame(x = c(0, 6), y = …gather()我正在尝试使用标准评估从 tidyr 包中排除一列。
使用非标准评估，效果很好：
mtcars_df <- head(mtcars[, c("mpg", "hp", "cyl")])
tidyr::gather(mtcars_df, key, val, -cyl)
但是，使用标准评估时，以下两项都不起作用，并且都返回错误：
tidyr::gather_(mtcars_df, "key", "val", -"cyl")
tidyr::gather_(mtcars_df, "key", "val", -cyl)
作为解决方法，我尝试使用select()辅助函数contains()，但这只是返回原始的data.frame：mtcars_df
tidyr::gather_(mtcars_df, "key", "val", -dplyr::contains("cyl"))
如何使用标准评估以这种方式排除列？这里发生了什么？
我正在尝试在 Hugo 中调整图像大小（不使用 HTML/CSS），这在v 0.32 update 中显然可用。在最后一句链接的“图像处理”标题下，描述了以下“调整大小”方法：
调整到给定的尺寸，{{ $logo.Resize "200x" }} 将调整到 200 像素宽并保持纵横比。使用 {{ $logo.Resize "200x100" }} 来控制高度和宽度。
我在我的 Hugo 网站上实现这个时遇到了一些麻烦。特别是，我正在使用一个.md文件，并试图添加一个存储在站点源文件中其他位置的图像。
例如，这是我在.md文件中添加（未调整大小的）图像的方法：
如何50x50使用 v0.32 版本中的调整大小方法添加相同的文件，调整为像素大小？
我正在尝试从打印输出不打印到控制台的功能输出.
capture.output在某些答案中建议使用该功能,但我不清楚如何捕获输出但仍然返回函数的输出.
例如,如果我有功能f()并且想要"printed output!"不打印到控制台但是"value"要返回:
f <- function() {
print("printed output!")
return("value")
}
# printed output is returned - want to capture the output
f()
#> [1] "printed output!"
#> [1] "value"
# also doesn't work, as captured output and function's output is returned
capture.output(f())
#> [1] "[1] \"printed output!\"" "[1] \"value\""
我认为解决方案可能涉及使用sink(和con()),但使用它们的答案不使用函数(因此我在应用该方法时遇到困难).
devtools::check()对于我准备提交给CRAN的软件包，我将继续通过R CMD检查（通过）（您可以在此处查看该软件包的结果：
Check: dependencies in R code
Result: NOTE
Namespace in Imports field not imported from: ‘tidyr’
All declared Imports should be used.
该软件包的源代码在GitHub上。我已经删除tidyr了整个软件包中所有提及的内容或其功能，但是该注释仍然存在。有许多的堆栈溢出的问题（即，这和其他资源这一点，但没有似乎适用于这种情况。我怎样才能解决这个笔记？
Travis CI 在构建 R 包时失败，出现以下错误，这是我以前从未见过的 - 并且似乎与没有检索到gpg 密钥有关（而不是我的代码中的典型错误:)）。
Installing R
0.46s$ sudo add-apt-repository "deb http://cloud.r-project.org/bin/linux/ubuntu $(lsb_release -cs)/"
60.08s$ sudo apt-key adv --keyserver ha.pool.sks-keyservers.net --recv-keys E298A3A825C0D65DFD57CBB651716619E084DAB9
Executing: /tmp/tmp.Cp93xmp8GR/gpg.1.sh --keyserver
ha.pool.sks-keyservers.net
--recv-keys
E298A3A825C0D65DFD57CBB651716619E084DAB9
gpg: requesting key E084DAB9 from hkp server ha.pool.sks-keyservers.net
gpgkeys: key E298A3A825C0D65DFD57CBB651716619E084DAB9 can't be retrieved
gpg: no valid OpenPGP data found.
gpg: Total number processed: 0
The command "sudo apt-key adv --keyserver ha.pool.sks-keyservers.net --recv-keys E298A3A825C0D65DFD57CBB651716619E084DAB9" failed and exited with 2 during .
Your build has been stopped.
更多关于 …
我正在尝试使用ggplot2R在美国制作状态热图.当我这样做时,我遇到了同样的问题,详见本文和本文,但是解决方案 - 指定左连接使用merge或使用dplyr::left_join或dplyr::inner_join似乎没有工作.
以下是我创建以下情节所做的事情,华盛顿,新泽西州,纽约的一部分缺失或颜色错误,使用的数据位于my_data情节之下:
library(ggplot2)
library(ggthemes)
str(my_data)
> str(data)
'data.frame': 50 obs. of 2 variables:
$ region : chr "alaska" "alabama" "arkansas" "arizona" ...
$ number_of_tweets: int 0 10967 5130 462 26489 267 1464 2431 9777 7359 ...
states <- map_data("state")
choro <- dplyr::left_join(states, my_data, by = "region")
ggplot() +
geom_polygon(data = choro,
aes(x = long, y = lat, group = region, fill = number_of_tweets)) + …我正在使用该haven库将.sav(SPSS) 文件读入 R。
某些值读取为labelled vector.
这是一个例子：
> str(df$instructional_practice)
Class 'labelled' atomic [1:4136] 2 2 6 6 8 8 NaN NaN 17 1 ...
..- attr(*, "label")= chr "intructional practice teacher is using when signaled"
..- attr(*, "format.spss")= chr "F8.2"
..- attr(*, "labels")= Named num [1:18] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:18] "1 Lecture" "2 Seatwk-Ind" "3 Review-Ind" "4 Seatwk-Grp" ...
如何vector获得标签名称的值？
我正在为我正在开发的包使用小插图中的forcats和包中的函数。devtools我将它们列在NAMESPACE 文件的Suggests(not not ) 字段中。Imports
当我运行时devtools::check()，会返回以下注释：
checking for unstated dependencies in vignettes ... NOTE\n\'::\' or \':::\' imports not declared from:\n \xe2\x80\x98devtools\xe2\x80\x99 \xe2\x80\x98forcats\xe2\x80\x99\n根据Stack Overflow 上这个问题的答案，将这些添加到“建议”字段应该可以解决导致该注释的问题，但在这种情况下，这对我来说似乎不起作用。您能建议如何处理此说明吗？如果有帮助，这里有一个包的链接。
\n我正在尝试为GitHub Pages Jekyll网站生成特定于帖子类别的RSS feed 。
我了解jekyll-feed插件可以为所有帖子生成RSS feed，但是根据GitHub Issue，尚不支持特定类别的feed。
生成特定于类别的提要的其他方法（即GitHub Pages不支持此处和此处，因为它不支持自定义插件。
有没有一种方法可以使用Jekyll和GitHub Pages生成特定于类别的RSS feed？