我的代码是否以最有效，最专业的方式编写？

问题描述

我已经编写了这段代码：

df <- df %>% 
  mutate(beggining= stringr::str_extract(message,"\\S+\\s+\\S+\\"),beggining = stringr::str_replace(beggining,'(^using URL:).*','\\1'),'(^more values).*','\\1')) %>%   
  group_by(class,beggining) %>%
  summarise(case = sample(message,1)) 

不管它做什么，都没关系。它可以工作，但我想知道它是工业级代码吗？我的意思是，它是以最有效的方式编写的（不是关于这里使用的库，而是关于函数的使用方式）。是专业水平的吗？如果没有，该如何重写为工业级代码？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）