Извлечение вершин контура из кадра данных - PullRequest
0 голосов
/ 09 апреля 2020

Привет, ребята, и заранее спасибо за вашу помощь.

У меня есть три столбца данных, два с координатами для моих данных (x и y) и значением мозговой активности (z). Из 7505 строк есть много координат с нулевыми данными, которые мне нужно исключить для моего статистического анализа.

Я использую пакет ImageS CC (https://rdrr.io/github/funstatpackages/ImageSCC/man/), поэтому мне нужно извлечь границы или контур моих данных, то есть мне нужен список из двух столбцов координаты, которые отделяют данные о деятельности мозга от нулевых данных. Это пример, предоставляемый пакетом:

    $Brain.V1
              V1         V2
 [1,] 0.07781920 0.33867403
 [2,] 0.07781920 0.56408840
 [3,] 0.07781920 0.65469613
 [4,] 0.07968313 0.43812155
 [5,] 0.10950606 0.50000000
 [6,] 0.11323392 0.25690608
 [7,] 0.12068966 0.73425414
 [8,] 0.16728798 0.18176796
 [9,] 0.19897484 0.83812155
[10,] 0.23625349 0.10441989
[11,] 0.26663278 0.63322031
[12,] 0.28808616 0.46804766
[13,] 0.28939153 0.30397021
[14,] 0.30335508 0.91325967
[15,] 0.31081081 0.04033149
[16,] 0.37862235 0.75747676
[17,] 0.42193552 0.19377116
[18,] 0.42823858 0.02044199
[19,] 0.43196645 0.94419890
[20,] 0.44787179 0.57753089
[21,] 0.45363822 0.38319933
[22,] 0.54193849 0.02554144
[23,] 0.54231688 0.73945984
[24,] 0.55125815 0.92756906
[25,] 0.58275116 0.25043703
[26,] 0.59755088 0.47843551
[27,] 0.63513514 0.89662983
[28,] 0.64072693 0.07616022
[29,] 0.66888720 0.64103671
[30,] 0.71390307 0.35218048
[31,] 0.72087605 0.84138122
[32,] 0.75069897 0.15050829
[33,] 0.78631797 0.50829246
[34,] 0.79543336 0.77508287
[35,] 0.84016775 0.26132597
[36,] 0.85507922 0.69552486
[37,] 0.92845294 0.39287293
[38,] 0.92845294 0.60502762

Я пробовал использовать пакет 'contoureR', но каждый раз, когда я запускаю свой код, Rstudio завершает работу и перезагружает сеанс. Это пример моего кода:

#install.packages("contoureR")
library(contoureR)

x = 1:ncol(df)
y = 1:nrow(df)
z = expand.grid(x=x,y=y)

z$z = apply(z,1,function(xx){df[xx[1],xx[2]]})
z$z[is.nan(z$z)] <- 0 


cl = getContourLines(z)

У кого-нибудь есть другие идеи о том, как я могу извлечь границы моих данных?

Заранее спасибо.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...