R中的积分和绘图功能

Question

我希望将温度T（y轴）绘制为位置x（x轴）的函数。

已知：

x = -1500 *（2T + 0.0003 T ^ 2）

期望的输出：

x vs T的图。

没有数据集。