Точечный график с указанием плотности точек - PullRequest
1 голос
/ 02 июля 2010

Функция qplot R имеет отличный альфа-параметр для затенения совпадающих точек на диаграмме рассеяния темнее.Вот оно в действии:

http://www.decisionsciencenews.com/2010/07/01/maps-without-map-packages

Мне интересно, как сделать то же самое в Mathematica.Вот код, чтобы получить данные из вышеприведенной статьи и построить их без изящной заливки:

data = Rest@Import[
  "http://www.decisionsciencenews.com/wp-content/uploads/2010/07/latlong.zip", 
  "latlong.csv"]

ListPlot[data, PlotRange -> {{-130, -65}, {23.5, 50.5}}, Frame -> True]

Вопрос в том, как добавить заливку точек?

1 Ответ

4 голосов
/ 02 июля 2010

Я думаю, что у этого есть несколько разных решений.Если вы просто хотите настроить непрозрачность каждой точки, вы можете:

ListPlot[data, PlotRange -> {{-130, -65}, {23.5, 50.5}}, 
 Frame -> True, PlotStyle -> Opacity[0.5]]

Это дает эффект, очень похожий на график в вашей ссылке.

Возможны пользовательские карты цветов на основе плотностино моя реализация пока не дает симпатичных графиков.

...