first test with ggplot
Graphics