setReactState: Set a React state
In shinyChakraUI: A Wrapper of the 'React' Library 'Chakra UI' for 'Shiny'

Description Usage Arguments Value See Also Examples

Set a React state from the Shiny server.

1	setReactState(session, componentId, stateName, value)

`session`	Shiny session object
`componentId`	the id of the `chakraComponent` which contains the state to be changed
`stateName`	the name of the state to be set
`value`	the new value of the state; it can be an R object serializable to JSON, a React component, a JSX element created with the `jsx` function, a Shiny widget, or some HTML code created with the `HTML` function

No return value, called for side effect.

withStates

library(shiny)
library(shinyChakraUI)

ui <- chakraPage(

  br(),

  chakraComponent(
    "mycomponent",

    Tag$Button(
      id = "button",
      className = "action-button",
      colorScheme = "facebook",
      display = "block",
      onClick = jseval("(event) => {event.target.disabled = true}"),
      "Click me to change the content of the container"
    ),

    br(),
    Tag$Divider(),
    br(),

    withStates(

      Tag$Container(
        maxW = "xl",
        centerContent = TRUE,
        bg = "yellow.100",
        getState("containerContent")
      ),

      states = list(containerContent = "I am the container content.")

    )

  )

)

server <- function(input, output, session){

  observeEvent(input[["button"]], {

    setReactState(
      session = session,
      componentId = "mycomponent",
      stateName = "containerContent",
      value = Tag$Box(
        padding = "4",
        maxW = "3xl",
        fontStyle = "italic",
        fontWeight = "bold",
        borderWidth = "2px",
        "I am the new container content, included in a Box."
      )
    )

  })

}

if(interactive()){
  shinyApp(ui, server)
}