如何将数据帧转换为空间坐标

Question

我有一个带有lat和lon数字坐标的数据集。我想添加一个＆＃34;空间点＆＃34;列，如sf包中所述。  我对空间数据了解不多，但这里有一个可重复的例子：

   data<-data.frame(Other_column=c("Street Presidente","Street",".",".",".","."),
                    RS=c(55,56,87,98,25,12),
                    longitude = c(28.6979, 53.0046, 4.3261, 24.9019,26.7328, 53.2439), 
                    latitude = c(-7.4197, -4.7089, -6.7541, 4.7817, 2.1643, -5.65)
                    )

   data

 Other_column            R$    longitude   latitude
 "Street Presidente.."    55     28.6979   -7.4197
 "Street ..."             56     53.0046   -4.7089
     .                    87      4.3261   -6.7541
     .                    98     24.9019    4.7817
     .                    25     26.7328    2.1643
     .                    12     53.2439   -5.6500

我希望数据框中的新列包含一个包含lat / long上的几何信息（geom_point）的列，而不是sf中的其他空间函数（和gdal / cgal ecossystem）。

Other_column            R$     longitude  latitude  geom_point
"Street Presidente.."    55     28.6979   -7.4197        
"Street ..."             56     53.0046   -4.7089         
    .                    87      4.3261   -6.7541        
    .                    98     24.9019    4.7817        
    .                    25     26.7328    2.1643        
    .                    12     53.2439   -5.6500