我正在研究一个项目,我有一个点特征 - 点特征包括142个点 - 和多个多边形(大约10个).我想计算R中每个单点和最近的面要素之间的距离.
我目前的方法很乏味,有点长.我目前正计划计算每个单点和每个多边形之间的距离.例如,我将计算142点和多边形A之间的距离,142点和多边形B之间的距离,142点和多边形C之间的距离等.以下是这些距离计算之一的示例代码:
dist_cen_polya <- dist2Line(centroids_coor, polygonA_shp)
在进行这些计算之后,我会编写一个代码来选择每个单点和最近的多边形之间的最小/最近距离.问题是这个程序很乏味.
有没有人知道最小化计算工作量/计算时间的包/代码？我真的想使用一个比较单个的包来指向最近的面要素或计算一个点和所有感兴趣的多边形之间的距离？
谢谢.
我几乎完成了下面的图表,但它有一个问题.
图表中的图例被绘制两次.
这是数据:
structure(list(Period = c("January 1997 - August 2003", "September 2003 - Jun 2005",
"Jul 2005 - Dec 2009", "January 1997 - August 2003", "September 2003 - Jun 2005",
"Jul 2005 - Dec 2009"), Time.Period = structure(c(1L, 3L, 2L,
1L, 3L, 2L), .Label = c("Jan 1997 - Aug 2003", "Jul 2005 - Dec 2009",
"Sep 2003 - Jun 2005"), class = "factor"), Variable = structure(c(2L,
2L, 2L, 1L, 1L, 1L), .Label = c("Significant", "Zscore"), class = "factor"),
Score = …现在我正在制作一个包含三个观测值的折线图.因此,有三个x轴刻度.
我想手动缩小x轴刻度之间的距离,并基本上强制观察彼此更接近.换句话说,我想减少x轴刻度之间的距离.
我的数据:
structure(list(Period = c("January 1997 - August 2003", "September 2003 - Jun 2005",
"Jul 2005 - Dec 2009", "January 1997 - August 2003", "September 2003 - Jun 2005",
"Jul 2005 - Dec 2009"), Time.Period = structure(c(1L, 3L, 2L,
1L, 3L, 2L), .Label = c("Jan 1997 - Aug 2003", "Jul 2005 - Dec 2009",
"Sep 2003 - Jun 2005"), class = "factor"), Variable = structure(c(2L,
2L, 2L, 1L, 1L, 1L), .Label = c("Significant", "Zscore"), class = "factor"),
Score = …我对R很新,所以这个问题非常基础,但我自己也无法解决.我非常感谢你的帮助.
这是我想要使用的一种数据帧:
Period Value Cut.off
1 January 1998 - August 2002 8.798129 1.64
2 September 2002 - Jun 2006 4.267268 1.64
3 Jul 2006 - Dec 2009 7.280275 1.64
这是我正在使用的代码:
require(ggplot2)
bq <- ggplot(data=glomor, aes(x=as.character(Period),y=Value))+geom_point()+ylim(0,10)
bq <- bq + scale_x_discrete(limits=c("January 1998 - August 2002","September 2002 - Jun 2006","Jul 2006 - Dec 2009"))
bq + geom_line()
我收到以下错误消息:
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
我如何更改代码,以便通过一条线连接点？
我正在尝试使用 betareg 包在 R 中运行 beta 回归模型。然而，我惊讶地遇到了内存大小问题。让我解释一下为什么这让我感到惊讶。
我使用的是 Windows 7，64 位，R-64，RAM 为 32 GB。
我正在运行的 betareg 命令是::
br1 <- betareg(dfp ~ ago + evl + spe + low + poly(fpt, 4, raw = T), data = tt[tt$zero_one_ind == 1, ], model = T, y = F, x = F)
betareg模型的对象大小为：
打印（对象.大小（br1），单位=“Mb”）46 Mb
这是我收到的错误消息：
Error: cannot allocate vector of size 344.1 Gb
In addition: Warning messages:
1: In diag(x %*% xwx1 %*% t(x)) :
Reached total allocation of 32693Mb: see help(memory.size) …