我最近发现使用Tableau Public使用背景图像并在其上映射数据是多么容易.这是他们网站上的流程.如您所见,它非常简单,您只需告诉软件您要使用的图像以及如何定义坐标.
这个过程在R中是否直截了当?什么是最好的方法?
我想创建一个不完全正方形但是矩形的地图,这是我指定的大小.
require(ggmap)
tenmile <- get_map(location = c(lon = -122.486328, lat = 48.862813),
color = "color",
source = "google",
maptype = "roadmap",
zoom = 12)
tenmile.map <- ggmap(tenmile,
extent = "device",
ylab = "Latitude",
xlab = "Longitude")+ggtitle("GEOMean for Data from Oct 2013-Nov 2014")
tenmile.map + geom_point(data=pp, aes(x=lon, y=lat, size=geomean), color="red", alpha=0.5) +
geom_text(data=pp, aes(x=lon, y=lat, label = site), size=3, vjust = 1.25, hjust = -0.1)
Run Code Online (Sandbox Code Playgroud)
我会发布我得到的和我想要的图片,但是我没有足够的声望点来发布图片.= - (
我从statmethods [dot] net借用了这段代码.结果是正态分布下的彩色区域.
mean=100; sd=15
lb=80; ub=120
x <- seq(-4,4,length=100)*sd + mean
hx <- dnorm(x,mean,sd)
plot(x, hx, type="n", xlab="IQ Values", ylab="Density",
main="Normal Distribution", axes=FALSE)
i <- x >= lb & x <= ub
lines(x, hx)
polygon(c(lb,x[i],ub), c(0,hx[i],0), col="red")
area <- pnorm(ub, mean, sd) - pnorm(lb, mean, sd)
result <- paste("P(",lb,"< IQ <",ub,") =",
signif(area, digits=3))
mtext(result,2)
Run Code Online (Sandbox Code Playgroud)

我想知道是否可以选择图像作为红色多边形的颜色?
非常感谢!
...理想情况下,使用PNG图像文件,如果不是JPEG.我可以加载一个flie
library(png)
img = readPNG("chart.png")
Run Code Online (Sandbox Code Playgroud)
但我被困在那里.目标是在图像上键入"Hello world"并保存.
谢谢.