-
Notifications
You must be signed in to change notification settings - Fork 13
/
przygotuj_opisy.R
96 lines (78 loc) · 4.97 KB
/
przygotuj_opisy.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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
responses <- read.csv('responses.csv', stringsAsFactors = FALSE)
opisuj <- function(wiersz, responses, plik){
zgloszenie <- responses[wiersz, ]
cat(paste0("# ", zgloszenie$Tytuł.warsztatu), file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat(paste0("[", zgloszenie$Imię, " ", zgloszenie$Nazwisko, ", ",
zgloszenie$Afiliacja.instytucja, "](", zgloszenie$Strona.internetowa, ")"), file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Opis warsztatu \n\n", file = plik, append = TRUE)
cat(zgloszenie$Opis.warsztatu, file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Plan warsztatu \n\n", file = plik, append = TRUE)
cat(zgloszenie$Plan.warsztatu, file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Wymagane pakiety \n\n", file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat(zgloszenie$Wymagane.pakiety, file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Wymagane od uczestników umiejętności i wiedza \n\n", file = plik, append = TRUE)
cat(zgloszenie$Wymagane.od.uczestników.umiejętności.i.wiedza, file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Wymagania wstępne do wykonania przed warsztatem \n\n", file = plik, append = TRUE)
cat(zgloszenie$Wymagania.wstępne.do.wykonania.przed.warsztatem, file = plik, append = TRUE)
cat("\n\n", file = plik, append = TRUE)
cat("## Język warsztatu \n\n", file = plik, append = TRUE)
cat(zgloszenie$Język.warsztatu, file = plik, append = TRUE)
}
dir.create('310_Sondaze/sesja_popoludniowa/')
file.create('310_Sondaze/sesja_popoludniowa/README.md')
opisuj(21, responses, 'Sondaze/sesja_popoludniowa/README.md')
dir.create('311_Web_Harvesting/sesja_popoludniowa/', recursive = T)
dir.create('311_Web_Harvesting/sesja_poranna/', recursive = T)
file.create('311_Web_Harvesting/sesja_popoludniowa/README.md')
file.create('311_Web_Harvesting/sesja_poranna/README.md')
opisuj(18, responses, '311_Web_Harvesting/sesja_poranna/README.md')
opisuj(10, responses, '311_Web_Harvesting/sesja_popoludniowa/README.md')
dir.create('312_Enterprise/sesja_popoludniowa/', recursive = T)
dir.create('312_Enterprise/sesja_poranna/', recursive = T)
file.create('312_Enterprise/sesja_popoludniowa/README.md')
file.create('312_Enterprise/sesja_poranna/README.md')
opisuj(2, responses, '312_Enterprise/sesja_poranna/README.md')
opisuj(4, responses, '312_Enterprise/sesja_popoludniowa/README.md')
dir.create('313_Uczenie_Maszynowa_Narzedzia/sesja_popoludniowa/', recursive = T)
dir.create('313_Uczenie_Maszynowa_Narzedzia/sesja_poranna/', recursive = T)
file.create('313_Uczenie_Maszynowa_Narzedzia/sesja_popoludniowa/README.md')
file.create('313_Uczenie_Maszynowa_Narzedzia/sesja_poranna/README.md')
opisuj(13, responses, '313_Uczenie_Maszynowa_Narzedzia/sesja_poranna/README.md')
opisuj(9, responses, '313_Uczenie_Maszynowa_Narzedzia/sesja_popoludniowa/README.md')
dir.create('314_Uczenie_Maszynowa_Metody/sesja_popoludniowa/', recursive = T)
dir.create('314_Uczenie_Maszynowa_Metody/sesja_poranna/', recursive = T)
file.create('314_Uczenie_Maszynowa_Metody/sesja_popoludniowa/README.md')
file.create('314_Uczenie_Maszynowa_Metody/sesja_poranna/README.md')
opisuj(15, responses, '314_Uczenie_Maszynowa_Metody/sesja_poranna/README.md')
opisuj(11, responses, '314_Uczenie_Maszynowa_Metody/sesja_popoludniowa/README.md')
dir.create('315_Wizualizacje/sesja_popoludniowa/', recursive = T)
dir.create('315_Wizualizacje/sesja_poranna/', recursive = T)
file.create('315_Wizualizacje/sesja_popoludniowa/README.md')
file.create('315_Wizualizacje/sesja_poranna/README.md')
opisuj(19, responses, '315_Wizualizacje/sesja_poranna/README.md')
opisuj(12, responses, '315_Wizualizacje/sesja_popoludniowa/README.md')
dir.create('316_Analiza_Wielowymiarowa/sesja_popoludniowa/', recursive = T)
dir.create('316_Analiza_Wielowymiarowa/sesja_poranna/', recursive = T)
file.create('316_Analiza_Wielowymiarowa/sesja_popoludniowa/README.md')
file.create('316_Analiza_Wielowymiarowa/sesja_poranna/README.md')
opisuj(5, responses, '316_Analiza_Wielowymiarowa/sesja_poranna/README.md')
opisuj(14, responses, '316_Analiza_Wielowymiarowa/sesja_popoludniowa/README.md')
dir.create('317_Grafy_Analiza_Tekstu/sesja_popoludniowa/', recursive = T)
dir.create('317_Grafy_Analiza_Tekstu/sesja_poranna/', recursive = T)
file.create('317_Grafy_Analiza_Tekstu/sesja_popoludniowa/README.md')
file.create('317_Grafy_Analiza_Tekstu/sesja_poranna/README.md')
opisuj(16, responses, '317_Grafy_Analiza_Tekstu/sesja_poranna/README.md')
opisuj(7, responses, '317_Grafy_Analiza_Tekstu/sesja_popoludniowa/README.md')
dir.create('318_Wydajnosc/sesja_popoludniowa/', recursive = T)
dir.create('318_Wydajnosc/sesja_poranna/', recursive = T)
file.create('318_Wydajnosc/sesja_popoludniowa/README.md')
file.create('318_Wydajnosc/sesja_poranna/README.md')
opisuj(6, responses, '318_Wydajnosc/sesja_poranna/README.md')
opisuj(22, responses, '318_Wydajnosc/sesja_popoludniowa/README.md')