data(concrete)
# Basic summary
summary(concrete)
# Strength vs Cement content
plot(concrete$Cement, concrete$Compressive.Strength..28.day..Mpa.,
xlab = "Cement (kg/m³)", ylab = "28-day Compressive Strength (MPa)",
main = "Cement Content vs Strength")
Run the code above in your browser using DataLab