如果我向ìris数据集添加一个新行:
iris <- as_tibble(iris)
> iris %>%
add_row(.before=0)
# A tibble: 151 × 5
Sepal.Length Sepal.Width Petal.Length Petal.Width Species
<dbl> <dbl> <dbl> <dbl> <chr>
1 NA NA NA NA <NA> <--- Good!
2 5.1 3.5 1.4 0.2 setosa
3 4.9 3.0 1.4 0.2 setosa
Run Code Online (Sandbox Code Playgroud)
有用.那么,为什么我不能在每个"子集"的顶部添加一个新行:
iris %>%
group_by(Species) %>%
add_row(.before=0)
Error: is.data.frame(df) is not TRUE
Run Code Online (Sandbox Code Playgroud) Bootswatch 的文档建议我可以使用选项卡集中选项卡的下拉菜单:
如何使用 Rmarkdown 实现这一目标?我试过了:
# SECTION 1 {.tabset .tabset-fade}
## Section 1.1
## Section 1.2 {????something here?????}
### Section 1.2.1 <<<<<<<<< want this to appear under the dropdown menu
Run Code Online (Sandbox Code Playgroud) 我正在使用ggforce包在几个页面上生成刻面图:
library(ggforce)
for(i in 1:6){
ggplot(diamonds) +
geom_point(aes(carat, price), alpha = 0.1) +
facet_wrap_paginate(~cut:clarity, ncol = 2, nrow = 2, page = i)
ggsave(paste0("~/diamonds_", i, ".pdf"))
}
Run Code Online (Sandbox Code Playgroud)
在一个单独的pdf中输出6页的最简单方法是什么?
我知道这可以用reports和pdftools包完成,但我想知道是否有更直接的方法来实现这一点.我希望ggforce能够为输出提供单页的功能,但看起来情况并非如此?
我有一个 .odc(办公数据连接),它将 Excel 连接到 Web 服务(MSBI、Web PowerBI)。
运行良好。我打开 odc 文件,Excel 打开并连接到数据源。
如何直接从 R 打开此连接?
odc 文件内容为:
<odc:ConnectionString>
Provider=MSOLAP;
Integrated Security=ClaimsToken;
Identity Provider=https://login.microsoftonline.com/common,
https://analysis.windows.net/powerbi/api, xxxxxx-xx-xx-xxxxxx;
Data Source=pbiazure://api.powerbi.com;
Initial Catalog=xxxxx-xxxx-xxxx-xxxx-xxxxx;
MDX Compatibility= 1;
MDX Missing Member Mode= Error;
Safety Options= 2;
Update Isolation Level= X;
Locale Identifier= 10XX
</odc:ConnectionString>
Run Code Online (Sandbox Code Playgroud)
这是我到目前为止所尝试的:
library(httr); library(httpuv)
oauth_endpoints("azure")
powerbi.urls <- oauth_endpoint(access = "authorize",
authorize = "token",
base_url = "https://login.windows.net/common/oauth2")
powerbi.app <- oauth_app(
appname = "pbiazure://api.powerbi.com XXXX-XX-XXX-a611",
key = "XXXXXXXXX",
secret = "XXXXXXXXX")
powerbi.token <- oauth2.0_token(powerbi.urls, powerbi.app,
user_params …Run Code Online (Sandbox Code Playgroud) 得到以下错误:
图书馆('ROracle')
inDL(x, as.logical(local), as.logical(now), ...) 中的错误:无法加载共享对象 'C:/Users/Daniel/R/winlibrary/3.2/ROracle/libs/x64/ ROracle.dll': LoadLibrary 失败: %1 不是有效的 Win32 应用程序。
library('ROracle')
Error in inDL(x, as.logical(local), as.logical(now), ...) :
unable to load shared object 'C:/Users/Daniel/R/winlibrary/3.2/ROracle/libs/x64/ROracle.dll':
LoadLibrary failure: %1 is not a valid Win32 application.
Run Code Online (Sandbox Code Playgroud)
我不知道从哪里开始解决这个问题。这是 libPath() 的结果
> .libPaths()
"C:/Users/Daniel/R/win-library/3.2" "C:/Program Files/R/R-3.2.3/library"
Run Code Online (Sandbox Code Playgroud)
Windows 10,R 版本 3.2.3
我找不到在我用RStudio制作的降价文档上插入内嵌图像的方法.
看起来像RmarkDown Style Cheat表(https://www.rstudio.com/wp-content/uploads/2016/03/rmarkdown-cheatsheet-2.0.pdf)没有提到这样的功能.
这目前可能吗?
这是一个使用html作为svg图像的示例:
link: http://www.herongyang.com/HTML/HTML5-Add-Inline-SVG-Image-HTML5-Documents.html
有谁知道如何在ggplot上使用操作(),以便轻松选择平滑(跨度)级别?我尝试了以下但没有成功:
# fake data
xvals <- 1:10
yvals <- xvals^2*exp(rnorm(2,5,0.6))
data <- data.frame(xvals,yvals)
# plot with manipulate
manipulate(
ggplot(data,aes(xvals,yvals)) +
geom_smooth(span=slider(0.5,5)) +
geom_point()
)
Run Code Online (Sandbox Code Playgroud)
我希望能够轻松地通过“平滑级别”。
这很令人尴尬:我承认我的几段代码与此类似:
Arghhhh!真正的程序员在看到类似的东西时会畏缩吗?
这个数字应该是不言自明的:我需要一个名为Season的变量,它根据WEATHERDATE列返回ID"(year-1)_(year)".
因此,日期从"1998-06-15"到"1999-06-14"的任何行都应在Season ID列下返回"1998-1999" .
WEATHERDATE列仅从1998-01-01运行到TODAY.
我打赌这有一个/两个班轮解决方案.我试过动物园包但没有成功.
任何R向导都指向我在这里缺少的明显解决方案?
***可重复的例子:
WEATHERDATE <- seq(as.Date("1998-01-01"), len=99999, by=1)
VARIABLE <- rnorm(n = length(WEATHERDATE))
data_mex <- data.frame(WEATHERDATE, VARIABLE)
## how to create SEASON based on dates??
# I would then run the code block from above, something like:
data_mex <- within(data_mex, Season[DATEWEATHER >= ymd(StartOfSeason)+365*0 & DATEWEATHER < ymd(StartOfSeason)+365*1 ] <- "1998-1999")
Run Code Online (Sandbox Code Playgroud)
当然,我不需要每年回来并触摸代码的解决方案将是理想的:)