आर - strtoi अजीब व्यवहार साल

Question

के सप्ताह मैं strtoi का उपयोग निम्नलिखित समारोह में वर्ष की सप्ताह निर्धारित करने के लिए प्राप्त करने के लिए:

to.week <- function(x) strtoi(format(x, "%W")) 

यह सबसे दिनांकों ठीक काम करता है:

> to.week(as.Date("2015-01-11")) 
[1] 1 

हालांकि,

> to.week(as.Date("2015-02-25")) 
[1] NA 

: जब मैं 2015-02-23 और 2015-03-08 के बीच तारीखों कोशिश कर रहा हूँ, मैं एक परिणाम के रूप NA मिल 0

क्या आप कृपया मुझे बता सकते हैं कि समस्या का कारण क्या है?

Answer 1

यहाँ एक कार्यान्वयन है कि काम करता है:

to.week <- function(x) as.integer(format(x, "%W")) 

कारण strtoi विफल रहता है डिफ़ॉल्ट यह संख्या की व्याख्या करने के रूप में यदि वे अष्टाधारी थे, जब वे एक "0" द्वारा preceeded कर रहे हैं की कोशिश करता रहा है। चूंकि "%W""08" लौटाता है, और 8 ऑक्टल में मौजूद नहीं है, तो आपको NA प्राप्त होता है। दिए गए आधार के अनुसार सी नियमों का पालन सी समारोह strtol का उपयोग कर, या एक उपयुक्त आधार चुनें पूर्णांकों को

Convert तार: ?strtoi से।

...

दशमलव तार as.integer समान रूप से उपयोगी है के लिए।

इसके अलावा, आप उपयोग कर सकते हैं:

week(as.Date("2015-02-25")) 

हालांकि आप अपनी अपेक्षाओं से 1 से इस बात का परिणाम ऑफसेट करने के लिए हो सकता है।

Answer 2

आप थोड़ा इस

to.week <- function(x) strtoi(format(x, "%W"), 10) 

की तरह अपने कोड को संशोधित करने और आधार का उपयोग 10