inst/apps/samplesize_determination_attributiv/server.R

In stephanGit/leistungstests: Supplies Functions to calculate 'leistungstests'

# attributiv

library(tidyverse)
library(shiny)
library(magrittr)
library(ggplot2)

library(leistungstests)

shinyServer(function(input, output, session) {

  # ATTRIBUTIV ---------------------
  source(file.path("attributiv", "server_attributiv.R"), local = TRUE, encoding = "UTF-8")$value

  # DOKUMENATION ------------

  # HELP pages
  source(file.path("dokumentation", "help_dialogs.R"), local = TRUE, encoding = "UTF-8")$value


})