Write a R program for with any dataset containing data frame objects, indexing and subsetting data frames, and employ manipulating and analyzing data.

stats <- data.frame(employe=c('A', 'B', 'C', 'D'),
salary=c(100, 200, 408, 23),
bonuspoint=c(17, 20, 3, 5))
print("stats Dataframe")
print(stats)
print(subset(x=stats, subset=bonuspoint>5, select=c(employe,bonuspoint)))