Estoy trazando una distribución de ángulos con elrose.diag funcionar desde elcircular biblioteca. Los datos de entrada son radiantes. Mi código MWE es

    library(circular);
    dat<-read.csv(file.choose(),header=F);
    data=unlist(dat);
    rose.diag(data, bins=24)

y obtengo este gráfico:

Estoy interesado en mostrar solo una parte de los datos, desde -pi / 2 a pi / 2, y que la longitud de la marca más grande es igual a la longitud del radio del círculo como se muestra aquí:

¡Cualquier ayuda sería apreciada!

EDITAR

Como lo sugiere #lawyeR, aquí está el código con una muestra de los datos:

    library(circular);
    data<- c(-0.188,-0.742,-0.953,-0.948,-0.953,-1.187,-0.9327200,-0.855,-  0.024,1.303,-1.041,-1.068,-1.066,1.442,1.150,0.965,0.665,0.649,0.984,-1.379,-0.584,-0.573,-0.357,-0.237,-0.287,-0.486,-0.783,-0.298,0.849,1.088,-1.003,-0.952,-0.776,-0.811,-0.880);
    rose.diag(data, bins=24);