a <-c("ene", "sad", "sym", "int", "ple", "con", "pan", "app", "in2", "anx", "bla", "in3", "par", "in1", "ret", "inp", "rea", "sui", "pes", "som", "irr", "wei", "agi", "sex", "hyp", "gas", "var", "qua")
b <-c(1.15220099, 1.10797504,1.05083488, 1.04075482, 1.04040974, 1.03017191, 1.00986077,0.97687106, 0.97651034, 0.96653016, 0.91066171,0.87499607, 0.82549958, 0.79714062, 0.76731441, 0.74983882, 0.73617558, 0.72655416, 0.70751901, 0.68061369, 0.67726459, 0.65987862, 0.6046725, 0.586737, 0.56771942, 0.46720748, 0.1767481, 0.08969517)
"geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?"
I don't have any groups, so the error message does not make sense to me (googling it I find hundreds of hits, but all for very different problems).