library(shiny) library(shiny.router) library(magrittr) library(ggplot2) library(plotly) library(DT) source("home_module.R",encoding="utf-8") source("about_module.R",encoding="utf-8") source("profil_module.R",encoding="utf-8") source("login_module.R",encoding="utf-8") source("register_module.R",encoding="utf-8") home_page <-homeUI(id="home") about_page <-aboutUI(id="about") profil_page <-profilUI(id="profil") login_page <-loginUI(id="login") register_page <-registerUI(id="register") router <- make_router( route("home", home_page,homeServer), route("about", about_page,aboutServer), route("profil", profil_page,profilServer), route("login", login_page,loginServer), route("register", register_page,registerServer) )