Как спрятать вектор смешанных типов и строк с точностью до n цифр?

Question

У меня есть вектор, состоящий из смешанных значений двойной точности и очень коротких строк символов. Я хочу, чтобы sprintf их, показывая результаты до n цифр. Проблема в том, что я не могу использовать строки sprintf, используя, например, sprintf("%.8g", x), поэтому вместо этого я использую "%.8s".

Из-за этого, если R пишет число в научной нотации, я печатаю только начало номера, и результаты не имеют смысла. Простой пример такого поведения ниже:

koza <- c(pi, " > ", 2.01645169344289e-05) 
sprintf("%.8s", koza) 

Что я получаю это:

[1] "3.141592" " > "  "2.016451" 

То, что я хочу получить либо что-то вроде:

[1] "3.1415927" " > "  "0.0000202" 

или

[1] "3.1415927" " > "  "2.0164517e-05" 

Как я могу это сделать?

Answer 1

Поскольку вы смешали числа и строки в этом векторе:

koza <- c(pi, " > ", 2.01645169344289e-05) 

R преобразовал их все символьные строки:

> koza 
[1] "3.14159265358979"  " > "     "2.01645169344289e-05" 

Так печать с "%s" форматировщиком будет форматировать его в виде строки , и поэтому вы получите только первые N символов "2.01645169344289e-05".

> sprintf("%.4s", "abcdefghij") 
[1] "abcd" 
> sprintf("%.4s", koza) 
[1] "3.14" " > " "2.01" 

Вы должны держать их как числовой как можно больше, форматировать их в виде десятичных чисел, а затем вставить их в строки.