堆积条形图不正确的类别标签
Stacked barplot incorrect category labels
悬停标签正确显示标签,但我无法在栏下获得正确的类别标签。
这是工作示例:
library(highcharter)
A <- data.frame(x=c(1,2,3,1,2,3),
y=c(0.7,0.8,0.7,0.3,0.2,0.3),
group=factor(c("A","A","A","B","B","B")),
cluster=c("C1","C1","C2","C1","C1","C2"),
name=c("John","Sally","Ed","John","Sally","Ed"),
stringsAsFactors=F)
A %>%
hchart(.,"column",hcaes(x="x",y="y",group="group")) %>%
hc_xAxis(title=list(text=NULL),allowDecimals=FALSE,categories=A$name[1:3]) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))
我曾尝试设置 categories=A$name
以防它需要六个值,但这不起作用。我已经尝试更改一些 x 轴选项(startonTick
、minPadding
、min
、max
),但似乎无法正常工作。
我在 x 轴上使用变量 'x' 而不是变量 'names' 来保留特定顺序,否则它会按字母顺序排序。
此问题与 x 轴为数字有关。两种方式让你得到你想要的。
首先,我将 x
分配给 name
A %>%
hchart(.,"column",hcaes(x="name",y="y",group="group")) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))
其他方法是声明A$x
一个因子
A %>%
dplyr::mutate(x = as.factor(x)) %>%
hchart(.,"column",hcaes(x="x",y="y",group="group")) %>%
hc_xAxis(title=list(text=NULL),allowDecimals=FALSE,categories=A$name[1:3]) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))
悬停标签正确显示标签,但我无法在栏下获得正确的类别标签。
这是工作示例:
library(highcharter)
A <- data.frame(x=c(1,2,3,1,2,3),
y=c(0.7,0.8,0.7,0.3,0.2,0.3),
group=factor(c("A","A","A","B","B","B")),
cluster=c("C1","C1","C2","C1","C1","C2"),
name=c("John","Sally","Ed","John","Sally","Ed"),
stringsAsFactors=F)
A %>%
hchart(.,"column",hcaes(x="x",y="y",group="group")) %>%
hc_xAxis(title=list(text=NULL),allowDecimals=FALSE,categories=A$name[1:3]) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))
我曾尝试设置 categories=A$name
以防它需要六个值,但这不起作用。我已经尝试更改一些 x 轴选项(startonTick
、minPadding
、min
、max
),但似乎无法正常工作。
我在 x 轴上使用变量 'x' 而不是变量 'names' 来保留特定顺序,否则它会按字母顺序排序。
此问题与 x 轴为数字有关。两种方式让你得到你想要的。
首先,我将 x
分配给 name
A %>%
hchart(.,"column",hcaes(x="name",y="y",group="group")) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))
其他方法是声明A$x
一个因子
A %>%
dplyr::mutate(x = as.factor(x)) %>%
hchart(.,"column",hcaes(x="x",y="y",group="group")) %>%
hc_xAxis(title=list(text=NULL),allowDecimals=FALSE,categories=A$name[1:3]) %>%
hc_plotOptions(column=list(animation=FALSE,stacking="normal"))