气泡图中的一些变化（ggplot）

Question

我需要对此情节进行一些更改：

library(ggplot2)    # load ggplot2 plotting package

x_var <- rnorm( n = 15, mean = 5, sd = 2)
y_var <- x_var + rnorm(n = 15, mean = 5, sd =4)
size_var <- runif(15, 1,10)

df.test_data <- data.frame(x_var, y_var, size_var)'

ggplot(data=df.test_data, aes(x=x_var, y=y_var)) +
    geom_point(aes(size=(size_var))) 

我问：

1. 如何更改图例的标题？
2. 如何为点提供随着点的值而变化的颜色标度（从黄色变为红色，黄色表示接近2的值，红色表示接近7的值）

Answer 1

这就是你想要的吗？

ggplot(data=dfx.test_data, aes(x=x_var, y=y_var)) +geom_point(aes(size=(size_var),color=size_var))+scale_color_gradient(low="yellow", high="red")+labs(colour="NEW TITLE")