Function to compute the third quartile
q3(data, ...)
data
vector with the data
...
further arguments passed to or from other methods
3st quartile value
q3(1:10)