在创建html文档时,如何将计算机中的并排png文件插入rstudio?
以下效果很好(情节)
```{r, echo=FALSE,fig.width=4, fig.show='hold'}
plot(cars)
plot(rnorm(100))
```
Run Code Online (Sandbox Code Playgroud)
但对于路径中的图像,仅显示最后一个图像
```{r fig.width=3, fig.show='hold'}
library(png)
img <- readPNG("C:/path to my picture/picture.png")
grid.raster(img)
img2 <- readPNG("C:/path to my picture/picture2.png")
grid.raster(img2)
```
Run Code Online (Sandbox Code Playgroud) 我使用了相同的方法将 NA 替换为空格或其他字符,但由于某种原因,这个方法不起作用。我想将数据框中的 NA 替换为空白(年份和年度列)。我究竟做错了什么?
shad.92 <- structure(list(year = c(1992, NA, NA, NA, NA), type = c("all age abundance index",
"adjusted number of fish older than age 0 measured", "adjusted total number of fish measured",
"percent YOY", "YOY abundance index"), September = c(755, 0,
565, 100, 755), October = c(530, 0, 434, 100, 530), November = c(463,
0, 338, 100, 463), December = c(266, 1, 136, 99.3, 264), Annual = c(2014,
NA, NA, NA, 2012)), row.names = c(NA, -5L), class …
Run Code Online (Sandbox Code Playgroud) 我对 Fortran 完全陌生,并且精通 R。我得到了一个巨大的 Fortran 程序,其中包含大约 30 个子例程和大约 15 个函数以及许多其他代码行。有人告诉我,我需要从 R 调用 Fortran 程序。我一直在网上寻找在 R 和 Fortran 之间创建这座桥梁的方法,但收效甚微。我可以从命令行成功执行 Fortran exe 文件并创建所需的输出。Fortran 文件名为“FortFish.f”
一个问题:
从 R 中,我是调用 Fortran 程序还是必须单独调用 Fortran 函数和子例程?
从 R 中,我是否像这样调用整个 Fortran 程序?:R CMD SHLIB FortFish.f 然后使用: dyn.load("FortFish.so")
如果我无法立即运行整个 Fortran 程序,我将根据要求发布几个小的 Fortran 函数和子例程。有谁有使用 R 和 Fortran 的运行示例可以分享吗?
我的 Fortran 代码非常大,否则我会把它贴在这里。谢谢。
我需要使用 ggplot2 中的 shapefile 来进行scale_fill_manual 的帮助。我尝试了很多事情,终于发布了,希望有人能给我提示。我基本上正在绘制一个 shapefile 并使用 scale_fill_manual 用自定义颜色对其进行可视化,然后在其上覆盖一些点,但是当我尝试在图例中包含我的新点时,我的原始颜色在那里,但值都弄乱了。绘制形状文件的上部工作正常,但覆盖新点时的底部是我需要帮助的地方。我内嵌了一些评论。如下:shapefile的下载路径为: https://login.filesanywhere.com/fs/v.aspx ?v=8c6a66875b6574bbaa68
library(tidyverse)
library(rgdal)
library(maptools)
library(plyr)
library(sp)
library(geosphere)
library(data.table)
library(rgeos)
wolves.map <- readOGR(dsn=".", layer="PNW_wolf_habitat_grid")
message(proj4string(wolves.map)) # it is in Albers Equal Area projection.
#Select presence/abscense only (1 and 0)
wolfsub <- wolves.map[!wolves.map$WOLVES_99 %in% 2,]
wolfsub$MAJOR_LC <-as.numeric(as.character(wolfsub$MAJOR_LC))
# Add columns to the wolfsub dataset. 42 = Forest, 51 = Shrub, > 81 = Agriculture
wolfsub$Forest<-ifelse(wolfsub$MAJOR_LC==42,1,0)
wolfsub$Shrub<-ifelse(wolfsub$MAJOR_LC==51,1,0)
wolfsub$Agriculture <- ifelse(wolfsub$MAJOR_LC > 81,1,0)
# create the model
mod1<-glm(WOLVES_99 ~ RD_DENSITY + Forest + …
Run Code Online (Sandbox Code Playgroud) 在这里查看答案 如何估计自举间隔?ggplot2列表上也提出了这个问题。
library(dplyr)
mtcars %>%
group_by(vs) %>%
summarise(mean.mpg = mean(mpg, na.rm = TRUE),
sd.mpg = sd(mpg, na.rm = TRUE),
n.mpg = n()) %>%
mutate(se.mpg = sd.mpg / sqrt(n.mpg),
lower.ci.mpg = mean.mpg - qt(1 - (0.05 / 2), n.mpg - 1) * se.mpg,
upper.ci.mpg = mean.mpg + qt(1 - (0.05 / 2), n.mpg - 1) * se.mpg)
Run Code Online (Sandbox Code Playgroud)