This code generates what it supposed to be.
ggplot(df,aes(x=df$month,y=df$fuel_swiperate,color=trans_card_type,group=trans_card_type)) +
geom_point() +
geom_line()
Since I have each category to be on a different facet, I am adding the facet_grid option, but the data is becoming very weird after that as the data are in the wrong facet.
ggplot(df,aes(x=df$month,y=df$fuel_swiperate,color=trans_card_type,group=trans_card_type)) +
geom_point() +
geom_line() +
facet_grid(~trans_card_type)