Как получить правильные отметки на 3d-графике рассеяния в R?

Question

Пожалуйста, посмотрите этот пример. смотреть на y ось. Данные там имеют только два уровня: 1 а также 2, Но в сюжете на этой оси нарисовано 6 отметок. Как я мог это исправить. x Ось имеет ту же проблему.

Данные

   extra group ID
1    0.7     1  1
2   -1.6     1  2
3   -0.2     1  3
4   -1.2     1  4
5   -0.1     1  5
6    3.4     1  6
7    3.7     1  7
8    0.8     1  8
9    0.0     1  9
10   2.0     1 10
11   1.9     2  1
12   0.8     2  2
13   1.1     2  3
14   0.1     2  4
15  -0.1     2  5
16   4.4     2  6
17   5.5     2  7
18   1.6     2  8
19   4.6     2  9
20   3.4     2 10

Сценарий

require('mise')
require('scatterplot3d')
mise()  # clear the workspace

# example data
print(sleep)

# plot it
scatterplot3d(x=sleep$ID,
              x.ticklabs=levels(sleep$ID),
              y=sleep$group,
              y.ticklabs=levels(sleep$group),
              z=sleep$extra)

Результат

Answer 1

Как насчет этого:

scatterplot3d(x=sleep$ID, y=sleep$extra, z=sleep$group, lab.z = c(1, 2))