what is the R functions to plot ,on a single gure, the hazard function h(t) for Weibull Distribution

for the cases (i) = 1, = 1, (ii) = 1, = 3, (iii) =1, =0.3, respectively. And the same thing for the survival function s(t) in separate figure