1

追加のプロットシンボルを探しています。現状の私のコードは次のとおりです。

library(maps)
map('state', 'north carolina')
x <- c(-81.18668,-78.38062)
y <- c(35.7767,35.7767)
points(x=x, y=y)

私が探しているのは、Googleマップで使用されているもの、できればルートマップで使用されているもの（つまり、ポイントAとポイントB）に似たプロットシンボルです。

これらのシンボルが組み込まれているパッケージはありますか、または誰かが簡単なハックのアイデアを持っていますか？ありがとう！

編集：ここで2つのポイントを示すようなシンボルをプロットすることを探しています：

http://goo.gl/maps/xjxqn

基本的に、ラベル（AとB）で形作られた涙滴。

4

2 に答える 2

1

あなたの質問はちょっと曖昧ですが、ここにいくつかのアイコンがあります：http: //www.bestpsdfreebies.com/freebie/map-marker-icons/

別のライブラリ：http ：//abeliantechnologies.com/google_map_marker.php

于 2012-10-23T14:33:54.357 に答える
1

my.symbolsTeachingDemosパッケージの関数を使用する1つの方法は次のとおりです。

library(TeachingDemos)
ms.mappoint <- function(letter='', col='blue', txtcol='white', cex=1, ...) {
    tmp <- seq( -3*pi/8, 11*pi/8, length.out=200 )
    tmp.x <- cos(tmp)/3
    tmp.y <- sin(tmp)/3 + 2/3

    tmp.x <- c(tmp.x, 0, tmp.x[1])
    tmp.y <- c(tmp.y, 0, tmp.y[1])

    polygon(tmp.x, tmp.y, col=col)
    text( 0, 2/3, letter, col=txtcol, cex=1, font=2 )
}

myx <- runif(10)
myy <- rnorm(10)
plot(myx,myy, ylim=c( min(myy)-.1, max(myy)+1) )
my.symbols(myx,myy, ms.mappoint, inches=1,
    col=rainbow(10), letter=LETTERS[1:10], symb.plots=TRUE )

全体的な形状には多少の改善が必要ですが、それは形状を表すx値とy値のマトリックスを作成するだけの問題です。

于 2012-10-23T16:25:07.097 に答える