刪除所有前導零並將數字轉化爲正數

Question

我試圖在R中將.000278轉換爲278，但是我看到的所有函數只能將其移動到.278。它需要是一個完整的正數。

是否有一個函數可以刪除編號前的.0+？

Answer 1

嘗試此（len可調）：

a <- 0.000278 
a*(10^match(T,round(a, 1:(len=10)) == a)) # counts the number of decimals places 
# 278 

使用as.numeric(a)萬一a是字符類型。

Answer 2

我假設你想要一次應用到很多數字（否則我可能不會理解這個問題）。

a <- c(0.003, 0.0056, 0.000278)#Example data 
a*(10^(nchar(a)-2)) 
[1] 3 56 278 

確保科學記數法與scipen禁用，因爲在this後（如討論，通過做options(scipen=999)，這很重要，因爲字符數有nchar數量進行計數（減去2「0」） 。

另一種方法，使用包stringr。

a <- c(0.003, 0.0056, 0.000278)#Example data 
library(stringr) 
as.numeric(str_replace(a, "0.", "")) 
[1] 3 56 278 

注意，用這種方法，你需要的輸出轉換回到數字使用as.numeric（不理想）。

Answer 3

或者使用

substr和regexpr什麼讓你想要什麼

x <- 0.000278 
as.numeric(substr(x ,regexpr("[^0.]",x),nchar(x))) 
[1] 278 

，這也適用於不同的號碼，只需設置：

options("scipen"=100, "digits"=10) # Force R not to use exponential notation (e.g. e-8)

，你可以嘗試例如：

z <- 0.000000588 
as.numeric(substr(z ,regexpr("[^0.]",z),nchar(z))) 
[1] 588 

Answer 4

> as.numeric(gsub("^[0.]*", "", paste(0.000278))) 
[1] 278