Mam nadzieję zbudować kilka wykresów, aby pokazać tendencje strzeleckie / skuteczność niektórych graczy i drużyn NBA. Chciałbym sformatować sześciokąty w następujący sposób: rozmiar będzie reprezentował liczbę strzałów, a kolor będzie reprezentował względną wydajność (pkt / próbę) z tego miejsca.Oto świetny przykład tego, czego szukam, autorstwa Kirka Goldsberry:

Mogłem użyćhexbins ihexTapply aby osiągnąć coś zbliżonego do pożądanego rezultatu, ale kształty są okręgami. Oto mój kod (zawierający przykładowe dane):

library(hexbin); library(ggplot2)
df <- read.table(text="xCoord yCoord   pts
11.4     14.9     2
2.6       1.1      0
4.8       4.1      2
-14.4    8.2      2
4.2       0.3      0
0.4       0.0     2
-23.2   -1.1      3", header=TRUE)
h <- hexbin (x=df$xCoord, y = df$yCoord, IDs = TRUE, xbins=50)
pts.binned <- hexTapply (h, df$pts, FUN=mean)

df.binned <- data.frame (xCoord  = h@xcm, 
          yCoord  = h@ycm, FGA = h@count, pts = pts.binned)

chart.player <- ggplot (df.binned, aes (x =xCoord , 
                  y =yCoord , col = pts, size = FGA)) + coord_fixed() + 
geom_point()  + scale_colour_gradient("Points/Attempt", low = "green", high="red")

Innym sposobem, aby o tym pomyśleć, jest kolorowanie sześciokątówplot(h, style="lattice") przez pts / próbę - ale też nie jestem pewien, jak to zrobić.

Czy istnieje sposób na uzyskanie tego wykresu za pomocą sześciokątów, a nie okręgów?