जब बलात्कार

Question

द्वारा NAS शुरू मैं आम तौर पर कोड आर करना पसंद करते हैं, ताकि मैं चेतावनी नहीं मिलता है, लेकिन मैं जब as.numeric का उपयोग कर एक चरित्र वेक्टर कन्वर्ट करने के लिए एक चेतावनी हो रही से बचने के लिए पता नहीं कैसे चेतावनी से बचने के लिए कैसे।

उदाहरण के लिए:

x <- as.numeric(c("1", "2", "X")) 

मुझे एक चेतावनी दे देगा क्योंकि यह बलात्कार से NAS की शुरुआत की। मैं चाहता हूं कि एनएएस जबरन द्वारा पेश किया जाए - क्या यह कहने का एक तरीका है "हां यही वह है जो मैं करना चाहता हूं"। या मुझे सिर्फ चेतावनी के साथ रहना चाहिए?

या मैं इस कार्य के लिए एक अलग समारोह का उपयोग करना चाहिए?

Answer 1

उपयोग suppressWarnings():

suppressWarnings(as.numeric(c("1", "2", "X"))) 
[1] 1 2 NA 

इस चेतावनी को रोकता है।

Answer 2

suppressWarnings() पहले ही उल्लेख किया गया है। एक विकल्प है कि समस्याग्रस्त वर्ण मैन्युअल रूप से एनए में परिवर्तित करें। आपकी विशेष समस्या के लिए, taRifx::destring बस यही करता है। इस तरह यदि आपको अपने फ़ंक्शन से कुछ अन्य, अप्रत्याशित चेतावनी मिलती है, तो इसे दबाया नहीं जाएगा।

> library(taRifx) 
> x <- as.numeric(c("1", "2", "X")) 
Warning message: 
NAs introduced by coercion 
> y <- destring(c("1", "2", "X")) 
> y 
[1] 1 2 NA 
> x 
[1] 1 2 NA 

Answer 3

सामान्य दबाने चेतावनी में सबसे अच्छा समाधान आप जब कुछ अप्रत्याशित इनपुट प्रदान किया जाएगा चेतावनी दी जानी करने के लिए चाहते हो सकता है के रूप में नहीं है। नीचे
समाधान डेटा प्रकार रूपांतरण के दौरान सिर्फ एनए बनाए रखने के लिए आवरण है। किसी भी पैकेज की आवश्यकता नहीं है।

as.num = function(x, na.strings = "NA") { 
    stopifnot(is.character(x)) 
    na = x %in% na.strings 
    x[na] = 0 
    x = as.numeric(x) 
    x[na] = NA_real_ 
    x 
} 
as.num(c("1", "2", "X"), na.strings="X") 
#[1] 1 2 NA