No worries, I had a bash. Here is my dataframe
tata3 <- data.frame( stringsAsFactors = TRUE, Subtype = c("lung", "prostate", "oesophagus"),
alive = c(88, 22, 100), dead = c(12, 55, 17), uncertain = c(10, 2, 2), total = c(186,46,202))
Then remove the 'Total' column using subset function, as this is superfluous.
tata3 <- subset(tata3, select= -c(total))
The convert data into long from wide by this code
tata3_long <- tata3
tata3_long$Subtype <- as.factor(1:nrow(tata3_long))
tata3_long <- melt(tata3_long, id.vars = "Subtype")
Then the following code to get the plot
ggplot(tata3_long, aes(x = Subtype, y = value, fill = variable)) + geom_bar(stat = "identity")
The only problem I am now left with is how to make the Subtype appear on the X Axis (i.e. Lung, Prostate, Oesophagus) rather than the numbers (1,2,3,). I think it is something to do with the
as.factor(1:nrow(tata3_long)
But I cannot modify this line of code successfully. Plot attached.

Cheers.