点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

所有，当我尝试在连接到Hana Server的Expert Analytics中执行以下R脚本时，遇到上述错误。

我错过了什么吗？

炮弹<-功能（炮）{


   #迭代创建的变量
   diversi_anni =唯一（cannons $ anno）
   diversi_mesi =唯一（cannons $ mese）
   diversi_gg =唯一（cannons $ giorno）
   Diversity_ore = unique（cannons $ ora）
  
   #创建最终数据结构
   cannoni_output <-data.frame（
     PONumber = double（），
     id = double（），
     temp = double（），
     umi = double（），
     anno = double（），
     mese = double（），
     giorno = double（），
     ora = double（），
     latitude = double（），
     经度= double（），
     cluster = double（）
   ）
  
   #每年的每个月的每个小时
 库（dynamicTreeCut）
  
   的（在diversi_anni中的年份）{
     每月（diversi_mesi中的月份）{
       的（在diversi_gg中的天数）{
         的（以小时为单位）
           #子集数据
           sub_ora =子集（cannons，cannons $ ora == hour＆cannons $ giorno == day＆cannons $ mese == month＆cannons $ anno == year）
          
           if（nrow（sub_ora）> = 3）{
             #集群数据清洁
             var_clust = sub_ora
             var_clust $ id = NULL
             var_clust $ ora = NULL
             var_clust $ giorno = NULL
             var_clust $ mese = NULL
             var_clust $ anno = NULL
             var_clust $ PONumber = NULL
             var_clust $ latitude = NULL
             var_clust $ longitude = NULL
             var_clust $ umi =标度（var_clust $ umi）
             var_clust $ temp =标度（var_clust $ temp）
             if（is.nan（var_clust $ umi））{var_clust $ umi = sub_ora $ umi}
             if（is.nan（var_clust $ temp））{var_clust $ umi = sub_ora $ temp}
            
             #距离计算
             d = dist（var_clust）
            
             #分层聚类
             c = hclust（d，method =" ward.D2"）
            
             #树木切割
             成员= cutreeDynamicTree（c，maxTreeHeight = 5，minModuleSize = 2）
             #members = cutree（c，k = 2）
             sub_ora $ cluster =成员
             cannoni_output = rbind（cannoni_output，sub_ora）
           }
         }
       }
     }
   }


   返回（列表（out = cannoni_output））
  
 };