给定R中的列列表,将Inf值替换为0

时间:2018-09-30 00:18:19

标签: r replace apply infinite

我在应用函数方面很糟糕,我在这里查找的每个答案都以某种方式使我很难解决这个问题,我已经尽力不去这里发表文章了。

我有一个名为“ log_fields”的列名列表

我想遍历数据帧“ df”中的每个列,并将无穷大的值替换为0。

这是我当前正在尝试使用的代码,它们必须是函数参数的语法错误,因为有人告诉我参数值丢失。

sapply(df[log_fields], function(x) replace(is.infinite(x),0))

我非常感谢您的帮助!

1 个答案:

答案 0 :(得分:2)

@IBAction func sendEmailClicked(_ sender: AnyObject) { let dateString: String = DateFormatter.localizedString(from: Date(), dateStyle: .short, timeStyle: .short) let body = "Lorem Ipsum <strong>\(dateString)</strong> dolor sit amet. <br><br><p><strong>\(String(describing: detailedLabel.text)).</strong></p><br>Lorem ipsum dolor sit amet.<br><br><p> <strong>\(String(describing: taskDescriptionTextView.text))</strong></p>" mailComposer = MFMailComposeViewController() mailComposer.mailComposeDelegate = self mailComposer.setToRecipients(["acme@acme.com"]) mailComposer.setSubject("\(dateString) Lorem Ipsum dolor sit amet.") mailComposer.setMessageBody(body, isHTML: true) if let image = self.taskPhotoImageView.image { let imageData: Data = UIImagePNGRepresentation(image)! mailComposer.addAttachmentData(imageData, mimeType: "image/jpg", fileName: "image.jpg") } self.present(mailComposer, animated: true) {} } ,如李哲源所示。

lapply(df[log_fields], function(x) ifelse(is.infinite(x), 0, x)),如dww所示。