Hello Everyone I am new to R


I have drawn indifference curves using the program below (Contour Plot)


u <- function(x, y) x^0.5 + y^0.5
x <- seq(0, 1000, by=1)
y <- seq(0, 1000, by=1)
a <- c(10, 20, 30)
contour(x, y, outer(x, y, u),levels=a,col="blue")




Now can any body please tell me how to draw Heat maps

and that too on the same indifference curve plot (contour)

	[[alternative HTML version deleted]]

