маркировка/окрашивание элементов/сегментов объекта конопли

У меня есть 3 связанных вопроса для графиков в spatstat:

1. Как пометить сегмент коноплянки. например просто идентификатор элемента
2. Как пометить ковариацию, прикрепленную к сегменту конопли на графике
3. Как контролировать ширину сегмента конопли на графике на основе: ковариации или, например, я хочу, чтобы толщина сегмента была пропорциональна количеству точек, реализованных на этом сегменте из точечного процесса в сети. Итак, если процесс генерирует 10 точек на линейном сегменте и 5 точек на втором сегменте, я хотел бы построить первый сегмент в два раза шире, чем второй сегмент.

Я нашел примеры в книге «Пространственные точечные шаблоны», но они указывают на использование изображения или плотности ядра для управления шириной сегмента. Я использую linfun для неоднородного процесса, и я не нашел метода для окрашивания или контроля ширины линии на моем графике или для маркировки графика.

Пример маленького квадрата:

library(spatstat)

v<-ppp(x=c(50,100,100,50), y=c(50,50,100,100),c(0,150), c(0,150)) #vertices
edg<-matrix(c(1,2,3,4,2,3,4,1), ncol=2) #edges
L<-linnet(v, edges=edg) #create a linnet

z<-c(11,22,33,44) # create covariate
Zfun <- linfun(function(x,y,seg,tp) { seg }, L)

plot(Zfun)

# I added some marks
marks(x) <- runif(npoints(x), 3, 4)

Спасибо