我正在尝试解决已解决的类似问题 here。
我有以下要绘制的线性函数:f(t) = a*t+b
。
我使用的代码:
library("ggplot2")
data <- read.table(sep=",",
header=T,
text="a,t,b
0.5, 1, 5
0.5, 2, 5
0.5, 3, 5
0.5, 4, 5
0.5, 5, 5")
eq = function(a,t,b){
a*t+b
}
ggplot(data = data, aes(a=a, t=t, b=b)) +
stat_function(fun=eq)
但是我还是无法得到函数的图。我做错了什么?