Using ggplot2 to create a plot with more than 2 variables - r

Question

I am working on a dataset with multiple variables as seen on sample below;(actual data set contains:84 obs. 24 variables). I want to create a single plot which takes in all the variables as opposed to creating a single plot for each variable.
Fruit Vitamin A(mg) Vitamin C(mg) Calcium(mg)
Pear 61 8 11
Apple 10 2 3
Cherry 35 10 11
Fig 5 2 67
I have tried the code below, an altered version of one suggested in one of the forums;
library(ggplot2)
g<- ggplot(FR, aes(Fruit)
g + geom_point() + facet_grid(. ~ FR[2:26,])
I get error;
Error: unexpected symbol in: "g<- ggplot(FR, aes(Fruit) g"
I am open to any better suggestions for alternatives to represent the dataset.

Answer 1

How about this:
To do this, you need to reshape your dataset using gather{tidyr}. Here is a reproducible example on how to do this:
# load libraries
library(ggplot2)
library(ggthemes)
library(tidyr)
library(googleVis)
# get data for a reproducible example
data("Fruits")
colnames(Fruits)[4] <- "Vitamin A(mg)"
colnames(Fruits)[5] <- "Vitamin C(mg)"
colnames(Fruits)[6] <- "Calcium(mg)"
Fruits <- Fruits[ c("Fruit","Vitamin A (mg)" , "Vitamin C (mg)", "Calcium (mg)")]
# reshape the dataset
df <- gather(data=Fruits, key=Fruit)
colnames(df)[2] <- "vitamin"
# Plot !
ggplot(data=df) +
geom_point(aes(x=vitamin, y=value , color=vitamin)) +
facet_grid(Fruit~., scale="free_x") +
theme_minimal()

Answer 2

I believe you're missing a closing parenthesis. Change:
g<- ggplot(FR, aes(Fruit)
to
g<- ggplot(FR, aes(Fruit))
In my experience, "unexpected symbol" errors usually mean you forgot to close parentheses or braces.

Answer 3

You aren't specifying the axes enough.
ggplot(FR, aes(x = Fruit, y = Vitamin A(mg),
shape = as.factor(Fruit),
color = as.factor(Fruit))) +
geom_point() +
geom_point(aes(x = Fruit, y = Vitamin C(mg))) +
geom_point(aes(x = Fruit, y = Calcium(mg)))
Is that what you wanted?