# R program to generate # random chi square density points# Setting seed for# random number generation
set.seed(1000)# Set sample size
N <-20# Calling rchisq() Function
y <- rchisq(N, df =10)
y
# R program to generate # random chi square density points# Setting seed for# random number generation
set.seed(1000)# Set sample size
N <-500# Calling rchisq() Function
y <- rchisq(N, df =10)# Plotting graph
plot(y)