Jim, > Ben's solution is excellent, I just thought I would add an alternative > starting with the X dataframe: > > x2<-matrix(X$Count,ncol=3) > rownames(x2)<-unique(X$Distance) > colnames(x2)<-unique(X$Species) > kiteChart(t(X3),xlab="Distance",ylab="Species") Thanks, very useful to see an alternative approach. Graham