Plot[Beta[a, 1], {a, 0, 5}]