# NOT RUN {
if (torch_is_installed()) {
# }
# NOT RUN {
# Assuming optimizer uses lr = 0.05 for all groups
# lr = 0.05 if epoch < 30
# lr = 0.005 if 30 <= epoch < 60
# lr = 0.0005 if 60 <= epoch < 90
# ...
scheduler <- lr_step(optimizer, step_size=30, gamma=0.1)
for (epoch in 1:100) {
train(...)
validate(...)
scheduler$step()
}
# }
# NOT RUN {
}
# }
Run the code above in your browser using DataLab