我看了一下这些选项,但是在解压缩文件时关闭输出的方式似乎并不明显.以下是我目前正在使用的代码......我只需要关闭输出的选项.
tar -zxvf tmp.tar.gz -C ~/tmp1
Run Code Online (Sandbox Code Playgroud) 在R,我想帮助试图复制教程在这里为自己的自定义SHP(Shape文件)文件或映射是一个交互式的地区分布图...
该地图是北爱尔兰的小地区.哪个可以在这里找到.
以下是我到目前为止采取的步骤......
我认为问题是geographyConfig数据的设置......
任何帮助将非常感激....
# Download and unzip the data
system('wget http://www.nisra.gov.uk/archive/geography/digital_products/SA2011_Esri_Shapefile.zip')
system('unzip SA2011_Esri_Shapefile.zip')
# Load libraries
library(rgdal)
library(rgeos)
library(rMaps)
shp.file <- 'SA2011.shp'
# Convert projection
system(paste0('ogr2ogr tmp.shp ',
shp.file,
' -t_srs "+proj=longlat +ellps=WGS84 +no_defs +towgs84=0,0,0"'))
# Read in the data
xx <- readOGR(dsn=getwd(),layer='tmp')
mm <- xx@data
head(mm)
n <- nrow(mm)
dat.val <- mm$Hectares
# Add extra year data
mm <- mm[rep(seq(n),3),]
mm$Hectares <- c(dat.val,rev(dat.val),dat.val/2)
mm$year <- rep(c(2000:2002),each=n)
colnames(mm)[1] <- 'ID'
id.var <- …Run Code Online (Sandbox Code Playgroud) 在R和RStudio中,我想我已经乱搞了.Rprofile文件几次了,我目前正在加载R或RStudio启动时的旧版本,有没有办法可以快速找到位置生成默认选项的文件?
谢谢
我正在使用RStudio创建一些传单图像.
我希望能够将输出保存为HTML,以便可以通过电子邮件发送,其他人可以查看它.
下面是一些示例R代码,它取自[here]以创建样本传单图像.
devtools::install_github('rstudio/leaflet')
library(leaflet)
rand_lng = function(n = 10) rnorm(n, -93.65, .01)
rand_lat = function(n = 10) rnorm(n, 42.0285, .01)
m = leaflet() %>% addTiles() %>% addCircles(rand_lng(50), rand_lat(50), radius = runif(50, 10, 200))
m
Run Code Online (Sandbox Code Playgroud)
任何能够以HTML格式输出的代码都会非常感激......
我在列表中创建了一些列表,并希望能够将每个子列表元素作为顶级的单个元素.
例如,创建一些虚拟数据:
pp <- lapply(10:15,function(y){
lapply(10:20,function(z){
as.data.frame(matrix(rnorm(z*y),nrow=z,ncol=y))
})
})
Run Code Online (Sandbox Code Playgroud)
这将创建以下输出
> summary(pp)
Length Class Mode
[1,] 11 -none- list
[2,] 11 -none- list
[3,] 11 -none- list
[4,] 11 -none- list
[5,] 11 -none- list
[6,] 11 -none- list
Run Code Online (Sandbox Code Playgroud)
你也可以做的地方
> summary(pp[[1]])
Length Class Mode
[1,] 10 data.frame list
[2,] 10 data.frame list
[3,] 10 data.frame list
[4,] 10 data.frame list
[5,] 10 data.frame list
[6,] 10 data.frame list
[7,] 10 data.frame list
[8,] 10 data.frame list
[9,] 10 data.frame …Run Code Online (Sandbox Code Playgroud) 在R中使用ggplot2时,它显然有一个base_family字体.它是什么?因为文档只使用"",如...
?theme_light()
Run Code Online (Sandbox Code Playgroud)
它看起来像ArialMT但不确定......
通常我使用R,并且经常在想要制作可重复使用的东西时使用sessionInfo().这样做的原因是我想让人们知道我正在使用的所有版本的版本以及我安装/加载了哪些软件包以及我使用的操作系统等等,以便它非常清楚.
sessionInfo 返回R的版本,处理器类型(例如32/64位x86),操作系统,区域设置详细信息以及已加载的软件包.
我是python的新手,想知道是否有Python的等价物?我希望在iPython笔记本中使用它......
我已经看到了一些与此相关的帖子...但是我看到的所有建议的解决方案似乎都不起作用....我在EC2实例中运行R并运行以下命令尝试安装rJava但无济于事...任何帮助将不胜感激.
> install.packages("rJava")
Installing package(s) into ‘/home/ubuntu/R/library’
(as ‘lib’ is unspecified)
trying URL 'http://cran.stat.nus.edu.sg/src/contrib/rJava_0.9-3.tar.gz'
Content type 'application/x-gzip' length 537153 bytes (524 Kb)
opened URL
==================================================
downloaded 524 Kb
* installing *source* package ‘rJava’ ...
** package ‘rJava’ successfully unpacked and MD5 sums checked
checking for gcc... gcc -std=gnu99
checking for C compiler default output file name... a.out
checking whether the C compiler works... yes
checking whether we are cross compiling... no
checking for suffix of executables...
checking for suffix of …Run Code Online (Sandbox Code Playgroud) 我有一个列表,每个元素都是一个字符向量,长度不同我想将数据绑定为行,以便列名称"排列",如果有额外数据则创建列,如果有数据丢失然后创建NA
下面是我正在使用的数据的模拟示例
x <- list()
x[[1]] <- letters[seq(2,20,by=2)]
names(x[[1]]) <- LETTERS[c(1:length(x[[1]]))]
x[[2]] <- letters[seq(3,20, by=3)]
names(x[[2]]) <- LETTERS[seq(3,20, by=3)]
x[[3]] <- letters[seq(4,20, by=4)]
names(x[[3]]) <- LETTERS[seq(4,20, by=4)]
Run Code Online (Sandbox Code Playgroud)
如果我确定每个元素的格式是相同的,那么下面的行通常就是我要做的...
do.call(rbind,x)
Run Code Online (Sandbox Code Playgroud)
我希望有人提出了一个很好的小解决方案,匹配列名称并用空格填充空白,NA同时添加新列,如果在绑定过程中找到新列...
我希望能够将数据直接从作为csv文件的data.frame\ s data.table对象写入AWS s3中的存储桶,而无需先使用AWS CLI将其写入磁盘.
obj.to.write.s3 <- data.frame(cbind(x1=rnorm(1e6),x2=rnorm(1e6,5,10),x3=rnorm(1e6,20,1)))
Run Code Online (Sandbox Code Playgroud)
目前我先写入csv,然后上传到现有存储桶,然后使用以下命令删除文件:
fn <- 'new-file-name.csv'
write.csv(obj.to.write.s3,file=fn)
system(paste0('aws s3 ',fn,' s3://my-bucket-name/',fn))
system(paste0('rm ',fn))
Run Code Online (Sandbox Code Playgroud)
我想要一个直接写入s3的函数?那可能吗?