Script:
# Read table data from csv file
data <- read.table("data.csv", header=T, sep=",")
# Start PDF device driver to save output to skills.pdf
pdf(file="skills.pdf", height=3.5, width=5)
# Draw bar chart
barplot(data$rating, main="Skills",
ylab="Rating", names.arg=data$skills)
# Turn off device driver (to flush output to PDF)
dev.off()Sample data.csv file:
skills,rating
Java,8
PHP,6
JavaScript,6
Android,6
C++,4Chart:
