11 lines
119 B
R
11 lines
119 B
R
|
|
GaussKruger <- function(){
|
|
|
|
x = fishnet(ext=c(-180, 180, -90, 90), dx = 6, dy=180)
|
|
plot(x, axes=T)
|
|
|
|
x
|
|
|
|
}
|
|
|