I have a vector containing some data, in particular
tau_3[p_3<3] [1] 7.837 7.813 6.276 8.669 7.001 6.032 6.897 5.967 9.417 8.251 7.892 8.752
