you should cast your character representation of numbers to be actual numeric type, before initiating the chart.
culture_nature_long$rel_freq <- as.numeric(culture_nature_long$rel_freq )
you should cast your character representation of numbers to be actual numeric type, before initiating the chart.
culture_nature_long$rel_freq <- as.numeric(culture_nature_long$rel_freq )