Helper function

Summarize by taking the mean (if numeric), the unique value (if there's only one), and NA otherwise

mysumfun(x)

Arguments

x	vector