@@ -13,24 +13,25 @@ param.set <- makeParamSet(
13
13
values = c(" adam" , " sgd" , " rmsprop" ," adagrad" ,
14
14
" adadelta" )),
15
15
makeDiscreteParam(" shared_nnet_spec" ,
16
- values = c( " 400" , " 500" , " 600" , " 700" ,
17
- " 800" , " 900" , " 1000" , " 1100" , " 1200" ,
18
- " 400,400" , " 500,500" , " 600,600" , " 700,700" ,
19
- " 800,800" , " 900,900" , " 1000,1000" , " 1100,1100" ,
20
- " 1200,1200" ) ),
16
+ values = c( " 400" , " 500" , " 600" , " 700"
17
+ # "800", "900", "1000", "1100", "1200",
18
+ # "400,400", "500,500", "600,600", "700,700",
19
+ # "800,800", "900,900", "1000,1000", "1100,1100",
20
+ # "1200,1200"
21
+ ) ),
21
22
makeDiscreteParam(" ind_nnet_spec" ,
22
- values = c( " 400:400:400" , " 600:600:600" ,
23
- " 800:800:800" , " 1000:1000:1000" ,
24
- " 1200:1200:1200" ,
25
- " 400,400:400,400:400,400" , " 600,600:600,600:600,600" ,
26
- " 800,800:800,800:800,800" , " 1000,1000:1000,1000:1000,1000" ,
27
- " 1200,1200:1200,1200:1200,1200" ,
28
- " 800,400:800,400:800,400" ,
29
- " 1200,400:1200,400:1200,400" ,
30
- " 1200,800,400:1200,800,400:1200,800,400"
31
- ) ),
23
+ values = c( " 400:400:400" , " 600:600:600"
24
+ # "800:800:800", "1000:1000:1000",
25
+ # "1200:1200:1200",
26
+ # "400,400:400,400:400,400", "600,600:600,600:600,600",
27
+ # "800,800:800,800:800,800", "1000,1000:1000,1000:1000,1000",
28
+ # "1200,1200:1200,1200:1200,1200",
29
+ # "800,400:800,400:800,400",
30
+ # "1200,400:1200,400:1200,400",
31
+ # "1200,800,400:1200,800,400:1200,800,400"
32
+ ) ),
32
33
makeDiscreteParam(" batch_size" , values = c(16 ,32 ,64 ,128 ,256 )),
33
- makeIntegerParam(" epochs" , lower = 10 , upper = 100 )
34
+ makeIntegerParam(" epochs" , lower = 5 , upper = 50 )
34
35
)
35
36
36
37
0 commit comments