R каркас () неправильная цветовая шкала с использованием решетки - PullRequest
Новая
       56

R каркас () неправильная цветовая шкала с использованием решетки

0 голосов
/ 23 мая 2018

Я пытаюсь построить трансект, используя wireframe() с lattice

неправильная цветовая полоса 

  require(marmap)
  require(lattice) 

     Bathy2 <- getNOAA.bathy(lon1 = 30, lon2 = 47,
                               lat1 = -12, lat2 = -28, resolution = 2)
#plot of the area + transect
     plot(Bathy2, image=TRUE, land = TRUE, lwd = 0.03,
             bpal = list(c(0,max(Bathy2), greys), c(min(Bathy2), 0, blues)))
     belt3 <- get.box(Bathy2, x1 = 34, x2 = 46, y1 = -20, y2 =  -20, width = 3, col = "red")

#3Dplot of the transect
       wireframe(belt3, shade = T, zoom = 1.1,
                  aspect = c(1/4, 0.1),
                  screen = list(z = -60, x = -55),
                  par.settings = list(axis.line = list(col = "white")),
                  par.box = c(col =rgb(0, 0, 0, 0.1)),
                  xlab="", colorkey = TRUE)

я получаю розовый цветовой полосой enter image description here

1 Ответ

0 голосов
/ 07 июня 2018

Как объяснено здесь , с shade = TRUE:

ОДНО ОДНО З-ЗНАЧЕНИЕ МОЖЕТ ИМЕТЬ РАЗНЫЕ ЦВЕТА в зависимости от ориентации фасета относительно направления просмотра иисточник света.Таким образом, цветовой ключ не имеет смысла.

Поэтому я предлагаю использовать drape = TRUE вместо: 

# 3Dplot of the transect
wireframe(belt3, drape = TRUE, zoom = 1.1,
          aspect = c(1/4, 0.1),
          screen = list(z = -60, x = -55),
          par.settings = list(axis.line = list(col = "white")),
          par.box = c(col =rgb(0, 0, 0, 0.1)),
          xlab="", colorkey = TRUE, lwd = 0.2)

enter image description here

Вы также можете определить свою собственную цветовую палитру,Просто отметьте ?wireframe.

...