Konverzia non-integer desatinných čísel na binárne - r, binárne, numerické

vstup dátového rámca (DF)

a
123.213
4343.344
3434.43255
422.45
34534

požadované výsledky v binárnom formáte (16 bitov)

Skúšal som nejakú funkciu

intTobits
rawTobits

ale nepracoval pre mňa

odpovede:

Konverzia celé číslo desatinné čísla do binárnych čísel sú dôkladne prediskutované v tento príspevok, Integer čísla sú iná otázka.

Pre binárne zobrazenie desatinných čísel s pohyblivou rádovou čiarkou môžete vyskúšať túto funkciu:

floatToBin <- function(x){
int_part <- floor(x)
dec_part <- x - int_part
int_bin <- R.utils::intToBin(int_part)
dec_bin <- stringr::str_pad(R.utils::intToBin(dec_part * 2^31), 31, pad="0")
sub("[.]?0+$", "", paste0(int_bin, ".", dec_bin))
}

Táto funkcia funguje iba pre nonnegative Čísla.

Toto je výstup pre čísla uvedené v otázke:

nums <- c(123.213, 4343.344, 3434.43255, 422.45, 34534)
sapply(nums, floatToBin)
#[1] "1111011.0011011010000111001010110000001"
#[2] "1000011110111.010110000001000001100010010011"
#[3] "110101101010.0110111010111011100110001100011"
#[4] "110100110.0111001100110011001100110011001"
#[5] "1000011011100110"