Как заставить построение графика R отображать пропущенные значения с осью категории - PullRequest
Новая
       6

Как заставить построение графика R отображать пропущенные значения с осью категории

0 голосов
/ 20 марта 2020

Я хочу построить простую гистограмму на графике R, и по умолчанию она пропустит наблюдения NA. В ggplot у нас есть параметр, чтобы отключить удаление NA по умолчанию, или мы можем настроить пределы оси. Однако я не могу сделать это в заговоре. 

dt_plot <- data.frame(categories = letters[1:10], values = c(rep(NA_integer_, 3), 1:5, rep(NA_integer_, 2)))
plot_ly(data = dt_plot) %>%
  add_bars(x = ~categories, y = ~values)

Я хочу показать ось х в виде последовательных букв 1:10, потому что я на самом деле включаю этот график в блестящее приложение с Dynami c выбор данных. Некоторые данные имеют значения во всех значениях x, некоторые имеют значения только в подмножестве. Я хочу, чтобы график был согласованным и всегда отображал полные значения x.

Здесь есть аналогичный вопрос , но ответ не относится к моему случаю, потому что я используя тип категории по оси x:

https://plot.ly/r/reference/#layout -xaxis

Если ось type является «категорией», это должны быть числа, используя шкала, где каждой категории присваивается серийный номер от нуля в порядке его появления.

Я пробовал разные комбинации диапазонов, но это не сработало. Кажется, что вначале они всегда удаляли наблюдения АН.

Есть связанная с этим проблема , когда Карсон Зиверт предложил взлом, но мне это тоже не помогло. 

# this do show all the x values but the plot is wrong
layout(xaxis = list(type = "category", tickvals = 1:10/10, ticktext = letters[1:10], range = c(0, 1)))

При проверке объекта графика создается впечатление, что данные NA удаляются перед построением графика: 

{
  "visdat": {
    "7abc7354f619": ["function () ", "plotlyVisDat"]
  },
  "cur_data": "7abc7354f619",
  "attrs": {
    "7abc7354f619": {
      "alpha_stroke": 1,
      "sizes": [10, 100],
      "spans": [1, 20],
      "x": {},
      "y": {},
      "type": "bar",
      "inherit": true
    }
  },
  "layout": {
    "margin": {
      "b": 40,
      "l": 60,
      "t": 25,
      "r": 10
    },
    "xaxis": {
      "domain": [0, 1],
      "automargin": true,
      "range": [0, 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9],
      "title": "categories",
      "type": "category",
      "categoryorder": "array",
      "categoryarray": ["a", "b", "c", "d", "e", "f", "g", "h", "i", "j"]
    },
    "yaxis": {
      "domain": [0, 1],
      "automargin": true,
      "title": "values"
    },
    "hovermode": "closest",
    "showlegend": false
  },
  "source": "A",
  "config": {
    "showSendToCloud": false
  },
  "data": [
    {
      "x": ["d", "e", "f", "g", "h"],
      "y": [1, 2, 3, 4, 5],
      "type": "bar",
      "marker": {
        "color": "rgba(31,119,180,1)",
        "line": {
          "color": "rgba(31,119,180,1)"
        }
      },
      "error_y": {
        "color": "rgba(31,119,180,1)"
      },
      "error_x": {
        "color": "rgba(31,119,180,1)"
      },
      "xaxis": "x",
      "yaxis": "y",
      "frame": null
    }
  ],
...
...