Developer Center

Resources to get you started with Algorithmia

Using Algorithmia in your Shiny App


Before you get started with this Shiny sample app, check out our Algorithmia R language Client and when you want to work with your own data, read up on Algorithmia’s Data Portal, which offers three different ways to store your data, all available via the Data API.

Here’s a basic example of how to call an algorithm via our REST API inside a Shiny app, which updates the UI based on the API call and check out the example on

# This is a Shiny web application. You can run the application by clicking
# the 'Run App' button above.
# Find out more about building applications with Shiny here:


# Define UI for application that draws a histogram
ui <- fluidPage(
   # Application title
   titlePanel("NY Births with Fourier Detrend"),
   # Sidebar with a slider input for number of bins 
                     "K strongest frequencies:",
                     min = 1,
                     max = 10,
                     value = 2)
      # Show a plot of the generated distribution

fourier_detrend <- function(x) {
  client <- getAlgorithmiaClient("YOUR_API_KEY")
  algo <- client$algo("TimeSeries/FourierDetrend/0.1.0")
  result <- algo$pipe(x)$result

# Define server logic required to draw plot
server <- function(input, output) {
  births <- scan("")
  # Update the plot based on UI slider
  update_plot = reactive({
    data_input <- list(as.list(births), input$bins)
   output$distPlot <- renderPlot({
     detrend_data <- update_plot()
     dbl <- ts(detrend_data, frequency=12, start=c(1946,1))
     autoplot(dbl, ts.colour = "#00B8D4")

# Run the application 
shinyApp(ui = ui, server = server)