Я думаю, что я должен использовать барицентрические координаты, чтобы показать это, и глубина цвета покажет значение L.
Следующая моя функция, носюжет, который я сделал, - чистый синий треугольник.Так не должно быть.
A = seq(0.00001, 0.99999, length=100)
B = A
O = A
L = log(A*A+2*A*O+B*B+2*B*O+2*A*B+O*O)
df = data.frame(cbind(A,B,O,L))
library(ggtern)
library(hexbin)
ggtern(df,aes(A,B,O)) +
geom_hex_tern(binwidth=0.05,
aes(value=L),
fun=mean)
Может кто-нибудь помочь мне улучшить этот кусок кода?