-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathserver_manual.R
executable file
·28 lines (25 loc) · 1.53 KB
/
server_manual.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
server_manual <- function(input, output, session, session.data) {
###################################################################################################
######################################## "Manual" tab ###########################################
output$manual.1.1 <- renderUI(includeHTML('html/1_1.html'));
output$manual.1.2 <- renderUI(includeHTML('html/1_2.html'));
output$manual.2.1 <- renderUI(includeHTML('html/2_1.html'));
output$manual.2.2 <- renderUI(includeHTML('html/2_2.html'));
output$manual.2.3 <- renderUI(includeHTML('html/2_3.html'));
output$manual.3.1 <- renderUI(includeHTML('html/3_1.html'));
output$manual.3.2 <- renderUI(includeHTML('html/3_2.html'));
output$manual.3.3 <- renderUI(includeHTML('html/3_3.html'));
output$manual.3.4 <- renderUI(includeHTML('html/3_4.html'));
output$manual.4.1 <- renderUI(includeHTML('html/4_1.html'));
output$manual.4.2 <- renderUI(includeHTML('html/4_2.html'));
output$manual.4.3 <- renderUI(includeHTML('html/4_3.html'));
output$manual.5.1 <- renderUI(includeHTML('html/5_1.html'));
output$manual.5.2 <- renderUI(includeHTML('html/5_2.html'));
output$manual.6.1 <- renderUI(includeHTML('html/6_1.html'));
output$manual.6.2 <- renderUI(includeHTML('html/6_2.html'));
output$manual.6.3 <- renderUI(includeHTML('html/6_3.html'));
output$manual.7.1 <- renderUI(includeHTML('html/7_1.html'));
output$manual.7.2 <- renderUI(includeHTML('html/7_2.html'));
output$manual.7.3 <- renderUI(includeHTML('html/7_3.html'));
session.data;
}