ggplot bug work around