# plot the PDF of a chi^2 random variable with df = 10 # plot the PDF of a chi^2 random variable with df = 10 curve(dchisq(x, df = 10), xlim = c(0, 25)) test_function("curve", args = c("expr", "xlim"), eval = c(NA, T)) test_student_typed("dchisq")