gpt4 book ai didi

r - R中的数字和函数

转载 作者:行者123 更新时间:2023-12-04 02:46:01 25 4
gpt4 key购买 nike

我正在寻找非常基本的数字函数 digit sum在 R。

  • 我没有找到预装的功能。
  • 即使在 Stackoverflow 的
    广泛的 R 库我没有找到记录。

  • 因此尝试自己以以下功能结尾:
    # Function to calculate a digit sum
    digitsum = function (x) {sum(as.numeric(unlist(strsplit(as.character(x), split="")))) }

    我工作,但我仍然在为以下两个问题而苦恼:
  • 在普通的R中真的没有数字和的功能吗?
  • 有没有更聪明的方法来编码这个函数?
  • 最佳答案

    这应该更好:

    digitsum <- function(x) sum(floor(x / 10^(0:(nchar(x) - 1))) %% 10)

    关于r - R中的数字和函数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/18675285/

    25 4 0
    Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
    广告合作:1813099741@qq.com 6ren.com