shiny.reviewer

Overview

shiny.reviewer is an R package providing a configurable shiny app allowing users submit and interactively filter and view content reviews. The app is designed to be accessed by multiple simultaneous users, on mobile devices, with a synchronized experience.

The package also includes helper methods to configure authentication for Google Sheets, which enables persistent storage when deploying to platforms like shinyapps.io or Github Pages.

A demo is available here: shiny-reviewer-demo

Usage

To install this package, execute the following:

remotes::install_github("lanceupton/shiny.reviewer")

To run a simple example, execute the following:

library(shiny.reviewer)
app_run(
  title = "Your Application Title",
  content_meta = CONTENT_META_EXAMPLE,
  reviews = REVIEWS_EXAMPLE, 
  group_meta = GROUP_META_EXAMPLE,
  launch.browser = TRUE
)

This runs an application using the provided example content (Mario Kart Wii tracks). This will work fine, but you’ll probably want to define your own content and record reviews submitted by users. The below boilerplate code demonstrates how to do this. It assumes that you have called DEV_auth_set() to write an encrypted gs4 token to the project directory.

# Load packages
library(shiny.reviewer)
library(gargle)
library(googlesheets4)
# Define Google sheets file ID and sheet here
REVIEWS_SSID <- Sys.getenv("REVIEWS_SSID")
REVIEWS_SHEET <- Sys.getenv("REVIEWS_SHEET")
# Fetch the gs4 token
DEV_auth_get()
# Read the Google Sheets file
reviews <- read_sheet(ss = REVIEWS_SSID, sheet = REVIEWS_SHEET)
# Read custom metadata
content_meta <- read.csv("data-raw/CONTENT_META.csv")
group_meta <- read.csv("data-raw/GROUP_META.csv")
# Run application
app_run(
  title = "Your Application Title",
  content_meta = content_meta,
  reviews = reviews, 
  group_meta = group_meta,
  # Append session reviews to the Google Sheets file
  callback = function(df) {
    sheet_append(ss = REVIEWS_SSID, data = df, sheet = REVIEWS_SHEET)
  },
  launch.browser = TRUE
)

Features

Explore Content

The main interface includes a button for each content item, styled based on the most recent review.

(TODO) If group_meta is provided, content is grouped into cards.

Blacklisted (blacklist=TRUE)

Top Rated (rating=5)

Unreviewed (timestamp=NA)

All Other Content

Content buttons also display all emojis included in the notes field.

Filter Content

(TODO) The left sidebar allows you to filter content based on the most recent review.

(TODO) The right sidebar allows you to search for content by title.

Review Content

When a content button is clicked, a popup is displayed which allows you to submit a content review.

Thanks

• googlesheets4 - This makes it easy to implement persistent data storage in remote environments.

• shinyMobile - This is so easy to use, and provides beautiful components.