25 lines
482 B
R
25 lines
482 B
R
|
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")
|
||
|
|
||
|
|
||
|
|
||
|
home_page <-homeUI(id="home")
|
||
|
about_page <-aboutUI(id="about")
|
||
|
profil_page <-profilUI(id="profil")
|
||
|
|
||
|
router <- make_router(
|
||
|
route("home", home_page,homeServer),
|
||
|
route("about", about_page,aboutServer),
|
||
|
route("profil", profil_page,profilServer)
|
||
|
)
|
||
|
|
||
|
|