R highcharter add multiple annotations with shapes

Question

I want to add annotations with shapes in Highcharter

Here is my data

data <- data.frame(a=c(1:12), b=runif(12, 1, 100))

I want to do this columns with some annotations shapes columns with multiple annotations shapes

I have already take reference with Highcharter annotation on date x-axis not working - R and Highcharter - add multiple text annotations

but I still can't make it, here is my example code

library(highcharter)

hc <- highchart() %>%
  hc_add_series(data, type='column', hcaes(a,b), marker=list(enabled=FALSE))
hc %>% 
  hc_annotations(
    list(
      shapes = list(
        list(
          point = list(
            x = data$a[5],
            y = data$b[5],
            xAxis = 0,
            yAxis = 0
          ),
          type = 'circle'
        )
      )
    )
  )

Thank you for considering my request！

In the last developing version, it is possible. Now I have the last version. — Iman, Jul 31 '18 at 12:19

score 2 · Accepted Answer · answered Jul 31 '18 at 10:46

Try it:

library(highcharter)
data <- data.frame(a=c(1:12), b=runif(12, 1, 100))
hc <- highchart() %>%
  hc_add_series(data, type='column', hcaes(a,b), marker=list(enabled=FALSE))
hc<-hc%>% 
  hc_add_annotation( 
    labels = list(
      list(
        point = list(
          xAxis =0 ,
          yAxis =0 ,
          x =data$a[5],
          y = data$b[5],
          xAxis=0,
          yAxis=0     
        ),
        text = "Is it OK?"
      )
    )
  )

hc%>% 
  hc_add_annotation(
    shapes=list(
      list(
      point=list(
      x=data$a[5],
      y=data$b[5],
      xAxis=0,
      yAxis=0),
      type= 'circle',
      r=10)))

R highcharter add multiple annotations with shapes

1 Answers1