Incorrect figure

[amingson]

Dear author! Thank you for sharing such a useful package!!!!

when i run 7.4 examples example1 code ::

test

cor_data <- cor(mtcars) %>% data.frame() %>% mutate(x = rownames(.)) %>% melt(.,id.vars = "x")

cor_data <- cor_data %>% filter(variable %in% c('mpg','cyl','disp','hp'))

add some value

cor_data$value2 <- rev(cor_data$value) cor_data$value3 <- runif(44,min = -1,max = 1) cor_data$value4 <- runif(44,min = -1,max = 1)

ggplot(cor_data, aes(x = x,y = variable)) + geom_jjtriangle(aes(fill = value),type = 'ul') + scale_fill_gradient(low = '#FFCC33',high = '#99CC33') +

new legend

new_scale_fill() + geom_jjtriangle(aes(fill = value2),type = 'br') + scale_fill_gradient(low = '#66CCCC',high = '#FF3399') + coord_fixed()

I got a different figure ！！！！ I hope I can get your help, thanks!

[amingson]

作者您好！ 就是我参考手册运行代码的时候，出现了不正确的显示结果，如图 希望能够得到您的帮助！感谢。

[junjunlab]

已经修复,重新安装即可。