Quantmod如何在右侧绘制Y轴

Question

从Quantmod的文档来看，我发现没有什么特别的方法可以将技术指标的Y轴（例如，体积，ATR，RSI ...）重新定位到图的右侧。要达到这种效果应该怎么做？

library('depmixS4')
library("shiny")
library("quantmod")
library("data.table")

ui <- fluidPage(

    plotOutput(outputId = "plot")

)

server <- function(input, output) {
    goog <- getSymbols("GOOGL", from = "2019-01-01", auto.assign = F)

    output$plot <- renderPlot({
        chartSeries(goog)
        addTA(ATR(goog))
    })
}

shinyApp(ui, server)