kouprianov: (Default)
[personal profile] kouprianov

Интересно, почему то, что написано здесь:

http://www.stat.berkeley.edu/classes/s133/saving.html

невозможно найти в книге Dalgaard P. Introductory Statistics with R. 2nd Edn. New York: Springer, 2008?

Во всяком случае, невозможно быстро найти в разделах, посвященных графике?

Date: 2012-01-27 04:51 pm (UTC)
From: [identity profile] ashipunov.myopenid.com (from livejournal.com)
А вот в нашей книге
http://r-statistics.livejournal.com/18764.html
это в самом начале ;)

Date: 2012-01-27 07:49 pm (UTC)
From: [identity profile] kouprianov.livejournal.com
А там нигде не написано, как покрасить точки в зависимости от значения одной из переменных? Есть переменная с номерами округов (числом, например, 41). Как бы сделать так, чтобы можно было красить их по одному, чтобы смотреть, где точки от конкретного округа на общей диаграмме рассеяния? То есть, я могу, конечно, выделить округа механически, но, быть может, есть более простой способ?

Date: 2012-01-27 09:13 pm (UTC)
From: [identity profile] ashipunov.myopenid.com (from livejournal.com)
Написано-написано.
Предположим, у Вас в переменной a содержатся некие цифры, а в переменной b -- номера округов.
Тогда
> plot(a, col=b)
покрасит все точки в разные цвета в зависимости от номера цвета в используемой палитре. Если нужно покрасить только один округ, например, под номером 41, то
> plot(a, col=((b==41)+1)
В этом случае все номера, не равные 41, станут FALSE, что в сумме с 1 даст 1, то есть черный цвет. Номер 41 станет TRUE, что даст цвет 2 (по умолчанию -- красный)

Date: 2012-01-27 09:16 pm (UTC)
From: [identity profile] ashipunov.myopenid.com (from livejournal.com)
Забыл закрывающую скобку во втором примере.
Вот пример, который можно просто запустить и посмотреть, что и как:
> a <- sample(50:100, 100, replace=TRUE)
> b <- 1:100
> plot(a, col=((b==41)+1))

Date: 2012-01-27 09:22 pm (UTC)
From: [identity profile] kouprianov.livejournal.com
Восторг! Сейчас пойдем-покрасим )

March 2025

S M T W T F S
      1
2345678
910 1112131415
16171819202122
23242526272829
3031     

Style Credit

Expand Cut Tags

No cut tags
Page generated Mar. 22nd, 2026 07:15 pm
Powered by Dreamwidth Studios