Отображать значения NA с графиком

Question

Допустим, у меня есть data.table, как следующая

data = data.table(week=c(1,2,3),price=c(2,2.5,1.5),promotion=c("p1",NA,"p2"))

неделя, цена, продвижение w1, 2, p1 w2, 2.5, NA w3, 1.5, p2

Iхочу отобразить разбросанный график цены с разным цветом раскрутки.

plot_ly(d, x = ~week, y = ~price,color=~promotion)

Проблема в том, что вывод, который я имею, не показывает второе наблюдение из-за значения NA в продвижении столбца, как показано ниже.

Я хочу отобразить все цены, включая цены с символом NA, в столбце «Продвижение». Спасибо за помощь!

Answer 1

Просто распространяюсь на решение Pork Chop и ваш комментарий под ним.Вот способ без изменения значений в data.table -

plot_ly(data, x = ~week, y = ~price, color= ~replace(promotion, is.na(promotion), "NA"))

Answer 2

library(plotly)
options(stringsAsFactors = F)
data = data.frame(week=c(1,2,3),price=c(2,2.5,1.5),promotion=c("p1",NA,"p2"))
data$promotion[is.na(data$promotion)] <- "NA"
plot_ly(data, x = ~week, y = ~price,color=~promotion)