inst/app-rfm/ui/ui_average_monetary.R

tabPanel("Median Monetary Value", value = "tab_average_monetary",

	fluidPage(

		fluidRow(
      column(6, align = 'left',
        h4('Median Monetary Value by Segment')
      )
    ),

    hr(),

		fluidRow(

			br(),
			br(),
			column(2),
			column(8, align = 'center', 
				plotOutput('segment_average_monetary') %>% 
					withSpinner()
			),
			column(2)

		)

	)

)

Try the xplorerr package in your browser

Any scripts or data that you put into this service are public.

xplorerr documentation built on Feb. 28, 2019, 5:05 p.m.