我有一个关于带有全局选项的数值打印格式的问题。
我的全球选择如下。
options(digits = 5)
它就像..。
# type 1
> 123.1234
123.12
# type 2
>1234.1234
1234.1
我希望它像下面那样通过修改全局选项来工作。(不使用圆形()函数)请参见下面的结果
> 1234.1234
1234.12
有人能帮我吗？
浏览 2提问于2015-07-09得票数 0
我正在寻找一种快速而简单的方法来降低R中一个数字的精度，要么显示在图表上，要么包含在报告(文本或表格)中。
我的目标函数是sprintf()，但似乎没有任何格式说明符足够一般地处理所有可能的情况，即使我正在寻找的是相当常见的(这是我们在学校里都教过的)。
例如，如果我想要舍入到三个重要数字，我正在寻找一个公式，它可能需要：
1 239 451人和回返者1 240 000人
-12.1257并返回-12.1
.0681与返回.0681
5和返回5
注意：提供了我认为只是这样一个函数的javascript实现，但我不是javascript专家，而且使用的一些函数的语法对我来
浏览 1提问于2013-07-29得票数 0
回答已采纳
1回答
请原谅我写的这段不美观的代码，但我想先让它正常工作。(“当然，这只是暂时的。除非它起作用”，-red green)
我正在尝试创建一个函数，它将以我需要的样式格式化数字列。它看起来像这样。
frmt <- function(x, rates=FALSE, thou=FALSE) {
ifelse(x==0, "0",
ifelse(x < 0.01 & thou==TRUE, "<0.01",
ifelse(x < 0.1 & thou==FALSE, "<0.1",
i
浏览 0提问于2012-06-13得票数 0
回答已采纳
1回答
我对小数有困难。我有一个数字向量，例如：
x <- c(400000, 500000, 100000, 97500)
我想把他们变成这样：
x <- c(4000.00, 5000.00, 1000.00, 975.00)
我尝试过像round、format和options这样的命令，但它们所做的只是向这些数字添加更多的零。如何更改向量中的小数位？
提前感谢！
浏览 1提问于2018-10-27得票数 0
回答已采纳
关于控制R如何打印指数字符的记法的简单问题。默认值似乎是小写的'e‘，但实际上我更喜欢大写的'E’，以便将数据框写入CSV文件，该文件不会更改与其他CSV文件不同的列，其他CSV文件的指数字符采用大写约定。
默认R选项
> 10^100
[1] 1e+100
期望输出
> 10^100
[1] 1E+100
浏览 2提问于2014-12-06得票数 0
1回答
是否可以对数字进行舍入(根据条件删除指数)。示例
> paste0(as.character(as.numeric(0.00000044854548)), "%")
[1] "4.4854548e-07%"
> paste0(as.character(as.numeric(0.44854548)), "%")
[1] "0.44854548%"
预期输出(基本上坚持4个非零数字)，如果数字是0.00000044854548，那么"0.0000004485%“。如果数字是0.44854548，那么"0.4
浏览 0提问于2020-07-23得票数 1
我用tm_polygons制作了一张合唱图(不是一个可复制的例子)
label <- labels_rec %>%
filter(VAR == sgf_var & TABLEAU == tab)
map <- tm_shape(sgf_polyg) +
tm_polygons(col = "V137", style = "equal", title="sgf_var",
, textNA = "Valeur manquante",
legend.hist = T
浏览 3提问于2021-11-20得票数 0
回答已采纳
在R中，我使用prettyNum()函数格式化一些数字，但我很难得到我想要的数字数。帮助医生说：
小数点(format = "f")或有效数字(format = "g"，= "e“或= "fg")之后所需的数字数。
默认值:整数为2，实数为4。如果小于0，则使用6位的C默认值。如果指定为50以上，则50将与警告一起使用，除非格式= "f“限制在典型的324。(根据所使用的操作系统和编译器，不超过15-21位数必须准确。这个限制只是防范底层C运行时中的分段错误。)
对我来说，这似乎意味着prettyNum(404.5142, di
浏览 2提问于2022-02-22得票数 3
回答已采纳
我有一个数据框，其数字类似于：
df$X1 df$X2
.9 1.442
如何使用此数据框中的元素为置信度区间创建标签，该标签将是格式良好的字符串：
(0.90, 1.42)
我在paste、as.character和c()之间迷路了，似乎什么都不能用:/
浏览 0提问于2012-04-20得票数 3
回答已采纳
我有一个矢量
a<-c(18.123412, 0, 1.5, 34.123, 2.1)
我想用它来创建一个字符串。
paste(round(a,3), collapse = " " )
一切都很好，但问题是我希望每个数字的输出是相同的，这里我指的是以下内容。现在我有了
"18.123 0 1.5 34.123 2.1"
我需要
"18.123 0___ 1.5__ 34.123 2.1__"
这里_表示这样的想法，因为数字的位数较少，我们需要用空格来替换它们。你知道我该如何做到这一点吗？
浏览 2提问于2012-11-06得票数 2
回答已采纳
Ich有一个数值(x1=0.01)，我想用两个有效数字格式化它：
> p_digits <- 2
> x1 <- 0.01
> str(x1)
num 0.01
> formatC(x1, format = "fg", digits = p_digits, flag = "#", big.mark = "'")
这就给出了：
[1] "0.010"
现在，我从一个具有结构的dataframe中检索相同的值
> str(df0)
'data.frame': 3
浏览 10提问于2019-08-21得票数 0
2回答
我有一个数据表，我想用逗号格式化其中的数字。
这是我的代码：
data<- data.frame(x = c(100000,4000000,6000000),y=c(43125343243, 3421341234, 324134314343))
data
formatC(data, format="d", big.mark=',')
data
我收到一个错误：
Error in formatC(data, format = "d", big.mark = ",") :
(list) object cannot
浏览 3提问于2014-04-24得票数 0
我正在用ggplot2绘制x轴上的一些数据，以秒为单位。数据是模拟的结果，或者是在被监视的跟踪上计算的结果。
我用scale_x_time来得到合适的标签。然而，由于数据跨度很大，我想在标签中包括天数和周数。最起码的例子：
library(ggplot2)
n = 100
d <- data.frame(
t = seq(from=0, to=100*24*60*60, length.out=n),
v = runif(n, min=10, max=20)
)
ggplot(d) + geom_point(aes(x=t, y=v)) + scale_x_time()
浏览 2提问于2019-10-15得票数 0
4回答
我正在处理一个小时格式的数据库，如下：
HOUR ID
1 2
10 4
5 6
20 6
我想在包含1个字符的值中放置一个零，并将它们存储在一个名为NHOUR的新列中，如下所示：
NHOUR HOUR ID
01 1 2
10 10 4
05 5 6
20 20 6
到目前为止，我一直在为这样的事情而苦苦挣扎(我遵循论坛中已经提供的一些建议)：
DB$NHOUR<-with(DB,ifelse(nchar(HOUR,type="chars")==1),sprintf("%02d",HOUR),as.numeric(HOUR))
但是没有任何成功！R
浏览 2提问于2013-01-19得票数 27
回答已采纳
1回答
我知道已经发布了一些东西，但并不像我想要的那样完整。
使用任何帮助函数(例如?mean)，并意识到它的输出(或者至少输出应该能够以相同的方式生成)。
你是如何进入，对齐/推荐的？
示例：
strings <- c("t", "df", "p-value", "mean of x", "mean of y")
values <- c(t, df, pvalue, mean1, mean2)
如果这是您希望在R中输出的内容(当从函数调用时)，那么如何使[1]消失，并将值排列在一起？
浏览 2提问于2012-10-28得票数 12
回答已采纳
2回答
我希望对特定的R脚本有一致的输出。在这种情况下，我希望所有的数字输出都采用科学记数法，并且恰好有两位小数。
示例：
0.05 --> 5.00e-02
0.05671 --> 5.67e-02
0.000000027 --> 2.70e-08
我尝试使用以下选项：
options(scipen = 1)
options(digits = 2)
这给了我结果：
0.05 --> 0.05
0.05671 --> 0.057
0.000000027 --> 2.7e-08
当我尝试的时候，我得到了同样的结果：
options(scipen = 0)
option
浏览 18提问于2016-09-22得票数 57
回答已采纳
我想按照下面的示例创建一个从0到9999的4位数字列表：
list(c("0001","0002","0003","...","9998","9999"))
浏览 17提问于2020-05-27得票数 0
在准备一个将标准化的双精度数字转换为十进制数字的函数时，我需要如下内容： substr(01001011, 2, 5) # what is in fact:"0010" (because leading 0 is ignored)
substr(01001011, 2, 5) # what I want:"1001"
substr("01001011", 2, 5) # "1001"; gives what I want BUT the following: 在substr("01001011", 2, 5)中，
浏览 14提问于2019-05-28得票数 3
回答已采纳
2回答
用R对格式化日期进行排序
、、、
我在R中有一个日期和数值的数据帧。这些日期都是一个月的第一个月，值是一个与该月相关的数字
library(DT)
library(dplyr)
df <- data.frame(date = as.Date(c("2017-01-01","2017-02-01","2017-03-01","2017-04-01")),
val = c(-5600,7000,4200,-2000))
我想把这个坚持到DT::datatable()，这是我的新宠。然而，我希望输出的格式很好，千个分隔符，漂亮的
浏览 1提问于2017-08-11得票数 2
我正在进行一个元分析在R与元the包。我遵循了关于的教程
如何在“所有研究的RE模型”中添加τ^2？
library(metafor)
### load BCG vaccine dataset
data(dat.bcg)
res <- rma(ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg, measure="OR",
slab=paste(author, year, sep=", "), method="REML")
###Plot Forest Plot
forest
浏览 2提问于2018-01-11得票数 1
回答已采纳
2回答
我试图在ASCII表中显示极小的数字(<1E-12)。(相信我，我找不到其他选择了。)到目前为止，我已经尝试过观星器和xtable。两者似乎都不起作用。我可以用HTML中的xtable用科学符号显示数字，但不能用ASCII。看星者似乎没有选择用科学符号来显示数字。以下是一个例子：
library(stargazer)
example <- data.frame(parameter = letters, value = runif(26, min = 1E-14, max = 5E-14))
stargazer(example, summary = F, type = "te
浏览 1提问于2016-04-12得票数 6
回答已采纳
我正在运行下面的代码来总结r中的变量
setDT(RWA_Cleansed_Data)[, .(value=sum(ACCOUNT_BALANCE), freq = .N) , by = PERIOD ]
输出是
PERIOD value freq
1: 201907 167050951793 48840
如何获得小数点2位的打印值？
我试图让R总是显示数字变量与小数点2位在数据框架。
浏览 4提问于2019-09-17得票数 1
回答已采纳
2回答
我想创建一个空的表/矩阵，稍后将填充值。数据列(例如下面的"Prec01 (p)“和"Prec04 (p)")应该有11个符号的固定宽度(将是程序特定的ascii格式)
!!Date Prec01 (p) Prec04 (p)
1992 10 02 00:00 0.4 0.0
有什么想法吗？
浏览 4提问于2015-04-15得票数 0
我有一个目录，其中包含以001.csv、002.csv等开头的多个文件。我希望选取函数中的那些文件，并将这些文件作为参数传递给该函数。对于ex。
myFiles<-function(x=1:30){
// I should pick only those files which starts with 001.csv till 030.csv.
}
我尝试使用模式匹配，但我不确定如何使用另一个由向量组成的变量进行模式匹配。我甚至尝试使用粘贴功能来粘贴完整的文件路径，但它给我的文件名是1.csv而不是001.csv
tt<-function(dirname,type,nums=1:3
浏览 0提问于2014-06-24得票数 0
1回答
我有一个带有NAs、负、正和0值的数字列。我想要的是：
如果值为正，我想在前面加上"+“，如果它是负的，0，或者NA，让它保持原样：
数据：
df <- data.frame (a = c(12,-34,NA,-23,5,0,NA))
预期成果：
a
1 +12
2 -34
3 NA
4 -23
5 +5
6 0
7 NA
浏览 0提问于2022-06-24得票数 4
回答已采纳
我正在努力创造一个美好的传奇。它应该包括希腊字母µ，我可以使用表达式，一些文字，即":“和"mm"，以及一个用formatC格式化的模型的系数。我运行起来没有问题的是没有希腊字母，然后我可以使用简单的粘贴命令
leg.txt <- c("Number of Points:"
,formatC(length(dist),big.mark=" ")
,"Normal distribution"
,paste(mu,":",formatC(f
浏览 0提问于2014-01-23得票数 2
我在试着解决一个格式化错误。我对数据帧应用的formatC()函数(使用lapply() )是在数据帧输出列标题中向空值添加一个小数点。我确实希望将空值保留在输出列标题中，我只是不想要一个“”。添加到列标题中每个空输出的末尾。lapply()和formatC()的这种组合对于格式化数据框架中的数值非常重要(尽管在下面的可重复代码中，为了简洁起见，它们不是生成的)。请看图片在底部，你可以看到问题。
我试着听从的建议，但它还没有对我起作用。
那么，如何防止将formatC()“应用”到空元素呢？离诺尔斯远点。
下面是经过严重破坏的代码，它在# commenting-out the below li
浏览 4提问于2022-04-29得票数 0
回答已采纳
1回答
我有一个从Oracle导入的带有17个数字的数值变量，例如：20172334534654667。
现在我使用R中的dbGetQuery()从Oracle导入它，但是R使用科学符号：2.01723e+16
如果我试图使用以下方法转换数字：
mydata$var <- format(mydata$a, scientific=FALSE)
我得到的是20172334534654600而不是20172334534654667，所以最后两个数字总是被替换为00。
我如何解决它，可能不使用额外的软件包？
浏览 2提问于2017-08-04得票数 2
我尝试将3.40转换为'3.40‘
> as.character(3.40)
[1] "3.4"
> as.character(11.30)
[1] "11.3"
我如何实现这一点？
[1] "3.40"
[1] "11.30"
如何编码？
浏览 0提问于2020-03-05得票数 0
1回答
我想将一个数字转换为指定数量的有效数字，例如，一些从FUN(1.01)返回"1.0" (作为字符)的函数。(我需要一个字符，因为该值将在xtable中使用。
我怀疑这是微不足道的，但我遇到了麻烦。
以下是我尝试过的方法：
> signif(1.01, 2)
[1] 1
> round(1.01, 2)
[1] 1.01
> format(1.01, digits = 2)
[1] "1"
> as.character(trunc(1.20, 3))
[1] "1"
> as.character(round(1.01,
浏览 0提问于2012-07-20得票数 2
回答已采纳
1回答
我想要一个像50000这样的数字被打印在针织品文档中，用半个空间作为一个数千个分隔符。在LaTeX中，我只需要使用50\,000，我希望通过Sexpr命令将其打印出来。也就是说，我想要一个函数reformat，当它在以下方面使用时
\documentclass{standalone}
\begin{document}
<<>>=
num <- 50000
@
The number is \Sexpr{reformat(num)}.
\end{document}
用一半的空间打印5万张。我面临的问题是，使用formatC似乎不允许正确数量的反斜杠
format
浏览 1提问于2015-05-31得票数 1
回答已采纳
我在做盒式情节，和传奇有问题。具体来说，我想写“n=formatC 2：≥( nrow (X))”，但是不能将≥符号的命令组合在一起，这是计算nrow(x)和formatC(nrow(x), bigmark=",")的函数，它应该给出带有1 000个分隔符的nrow号。
到目前为止我尝试过的是：
smoke <- matrix(c(1:1200),ncol=1,byrow=TRUE)
colnames(smoke) <- c("High")
smoke <- as.table(smoke)
pdf('test.pdf')
pl
浏览 4提问于2014-04-01得票数 1
回答已采纳
1回答
我有一个包含数字的数据框架。我需要通过添加逗号来格式化它。 df
ColA ColB
sd 68900744.0
fg 78900744.0
gh 88900744.0
fg 1375292.0 预期输出 df
ColA ColB
sd 68,900,744
fg 78,900,744
gh 88,900,744
fg 1,375,292
浏览 13提问于2020-01-30得票数 0
我希望能够在color中生成一个表格，其中单元格的背景颜色将根据映射到单元格中的值的颜色渐变进行设置。
有关示例，请参阅。
Pander似乎能够做一些条件突出显示，，但我找不到一个选项，可以允许单元格背景的条件格式。
浏览 0提问于2016-04-30得票数 0
2回答
我需要将大量的数字转换成字符串。对我来说最困难的部分是所有的字符串必须是4个字母的长度。例如"1“必须是"0001”或"234“必须是"0234”。我认为这是一个简单的问题，但我找不到答案。谢谢你的帮忙!
浏览 0提问于2014-02-01得票数 2
此数据
> seq(0,1,0.1) -> x
> x
[1] 0.0 0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9 1.0
可以很好地归入带有标签的类别，这些标签对我的应用程序来说是说明性的，但似乎我无法摆脱额外的(不需要的？)由于某种原因，函数引入的左范围端点：
> cut(x,breaks = 10,include.lowest = TRUE,right = TRUE,dig.lab=1)
[1] [-0.001,0.1] [-0.001,0.1] (0.1,0.2] (0.2,0.3] (0.3,0.4] (0.4
浏览 3提问于2021-03-26得票数 0
使用renderTable，我有一个表在R中显示，但是我只想将第二列的数字数更改为3位，第一列和第三列更改为0位数。这怎麽可能？
output$Table_X <- renderTable({
outputData <- loadFunc()
outputData$x
},
digits = 3)
在outputData <- loadFunc()行中，将创建列表outputData，其中包含一个名为'X‘的数据格式。这包括三列的数值数据。现在，可呈现性显示数据如下：
a b
浏览 2提问于2020-04-07得票数 2
回答已采纳
2回答
我没有找到假的，虽然这肯定是以前有人问过的。
如何在不首先没有小数的元素(双关半意)中创建小数点的数字列表(甚至是向量)。
unlist(list(1, 1.11))
#> [1] 1.00 1.11
浏览 2提问于2020-05-17得票数 4
回答已采纳
此代码在RStudio中单击"knit“时生成一个漂亮的PDF：
---
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo =真)
My favorite number is `r 1 - 0.999`
但是下面的代码会产生一个错误
---
output: pdf_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo =真)
My favorite number is `r 1 - 0.999
浏览 0提问于2018-03-24得票数 0
1回答
我想输出矩阵中较低的tri，并将其格式化为latex，以获得较好的输出。
我试过：
stargazer(overlap_stats1$overlap_prop$iso95[upper.tri(overlap_stats1$overlap_prop$iso95)])
但结果仅仅是一行输出。
浏览 0提问于2015-10-19得票数 0
回答已采纳
我希望R在小数点后只显示少量的浮点数。就像matlab中的"format short“一样。
有没有简单的方法可以做到这一点？
浏览 4提问于2011-11-17得票数 1
回答已采纳
1回答
我有下面的数据帧有两个输入字符串(input1和input2列)，需要帮助来转换输出字符串(如输出列中所述)。我正在寻找使用基础R(最好是正则表达式)的解决方案 df <- data.frame(input1=c("0000.00", "0000.00", "0000.00"),
input2 = c("23.3", "23", "2323.23"),
output = c("0023.30", "
浏览 26提问于2020-01-27得票数 1
回答已采纳
1回答
我正在处理一个赋值，我要编写的函数有3个args:包含要计算的表的目录，要由函数计算的列，以及序列1:x，其中x是目录中的文件数。
我的混淆是相当基本的，因为我不确定函数需要处理的目录是否需要设置为我的工作目录，或者该目录是否需要拥有整个文件路径。
理想情况下，我希望调用函数pm(“文件夹名”、"colname"，4:112 ##random seq)，以及函数中发生的任何数学运算。
不幸的是，我的语法知识有点缺乏，目前我正在尝试更改用户输入的序列以匹配文件名，因此我可以使用read.csv脚本只读取与用户定义的序列相匹配的表。
pm<-function(director
浏览 4提问于2014-06-17得票数 0
回答已采纳
我如何将一个科学数字乘以n位数呢？但仍然保留着E..。
期望产出：
round(num,2) ## Just an example, I know this does not work.
1.78943642E-10 -> 1.79E-10
2.68289674E-11 -> 2.68E-11
6.23486821E-15 -> 6.23E-15
浏览 0提问于2018-07-15得票数 0
回答已采纳
我有一个数据集，创建者将日期保存在三个独立变量中。我的目标是将这三个日期变量转换为一个保持时间顺序的单个数值变量。为了做到这一点，我首先把我的3个变量粘在一起。然而，我似乎无法将它转换成一个数值变量。请参阅下面的示例代码和我想要的输出。在R中必须有一些简单的方法来实现这一点，但是我所尝试的每一件事都会导致错误。
#example data
day <- c(1,2,13)
month <- c(1,2,12)
year <- c(2020, 2020, 2020)
#paste variables
Time <- paste(year, formatC(month,
浏览 3提问于2022-03-08得票数 0
回答已采纳
3回答
我需要像这样进行四舍五入，并将其转换为字符：
as.character(round(5.9999,2))
我希望它变成6.00，但它给了我6
有没有什么办法可以让它显示6.00
浏览 0提问于2010-08-16得票数 9
回答已采纳
我有很多大型数据帧(+500,000行)，这些数据帧包含跨多列存储的日期时间信息。它不是MM/DD/YYYY格式，而是一列中的年份、下一列中的Julien日历日和第三列中的时间。数据的结构如下：
df<-data.frame(YEAR = sample(2000:2020,10000, replace=T),
JULIEN = sample(1:365,10000,replace=T),
Time = sample(0:59,10000,replace = T),
dataVar1 = runif(10000,1.0,1
浏览 7提问于2020-05-08得票数 0
回答已采纳
1回答
我在谷歌上搜索了一下，找不到一个好的答案。我有下表：
Country Value
23 Bolivia 2575.684
71 Guyana 3584.693
125 Paraguay 3878.150
49 Ecuador 5647.638
126 Peru 6825.461
38 Colombia 7752.168
151 Suriname 9376.495
25 Brazil 11346.796
7 Argentina 11610.220
171 Venezuela 12766.725
168 Uru
浏览 5提问于2014-04-15得票数 7
2回答
在清理和格式化新数据以匹配旧数据之后，我将更新后的EPA测量数据的导出data.frame合并为现有的值data.frame，但当我试图将合并数据中的一组值与aggregate相加时，计算结束，因为更新的数据列出了不同的计数代码(奇怪的是，它们在网络数据库中是相同的)，即："6037“而不是"06037”。(对于保留5位代码的其他观测，即:不要以零开头)，这是一个没有问题的问题。
简单地使用：
df <- subset(df, column == c("6037", "06037" & column == "value
浏览 3提问于2014-08-21得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
