I can manually set radioButtons size:
ui <- fluidPage( tags$style(sprintf("input[type=\'radio\']{width: %spx; height: %spx;}", 20, 20