R 准备数据帧变异函数

我想准备一个数据集来制作变异函数。但它不起作用。如何创建x和y列的非数字空间点数据集

library(sp)
head(data)   

   x       y    R
   3695.99 1713.02 1.85
   2    3696.99 1712.98 1.32
   3    3697.99 1712.95 0.92
   4    3699.02 1713.05 0.70
   5    3700.02 1713.01 0.44
   6    3701.02 1712.97 0.26



   > coordinates(data) <- ~ x + y
  Error in .local(obj, ...) : 
   cannot derive coordinates from non-numeric matrix

库（sp）
总目（数据）
x y R
3695.99 1713.02 1.85
2    3696.99 1712.98 1.32
3    3697.99 1712.95 0.92
4    3699.02 1713.05 0.70
5    3700.02 1713.01 0.44
6    3701.02 1712.97 0.26
>坐标（数据）可能与坐标（df1）重复您使用的软件包是什么？由于您显示的错误是找不到该函数，您希望函数
坐标
来自何处？@user9931361，欢迎使用SO！我鼓励您查看有关编写最有可能被回答的问题的指导原则。错误消息表明您在x或y中有非数字坐标。请尝试
class（数据$x）
和
class（数据$y）
验证您的数据是否为数字。>class（数据$x）给出[1]“因子”“可能重复的”坐标（df1）您使用的是什么软件包？您希望函数
坐标
来自何处，因为您显示的错误是找不到该函数？@user9931361，欢迎使用SO！我鼓励您查看有关编写最有可能被回答的问题的指导原则。您的错误消息表明您没有在x或y的数字坐标上。请尝试
class（数据$x）
和
class（数据$y）
验证您的数据是否为数字。>class（数据$x）给出[1]“系数”