主页 / unix / 问题 / 779935
Accepted
user447274
Asked: 2024-07-11 17:20:34 +0800 CST

如何每次都对逗号后的数字进行四舍五入

  • 772

我在 Linux 机器上有一个文件，每行一个数字：

 3073771824
 1513517589
 4982173058
 1539400944
 3175320163
 5247018359
14359014635
....

我怎样才能将每个数字乘以 1.03（3%），然后将结果四舍五入，去掉逗号？例如：

 3073771824 * 1,03 = 3165984978,72 | I would have the result 3165984979
 1513517589 * 1,03 = 1558923116,67 | I would have the result 1558923117
....

我知道 awk 可以四舍五入：

echo 2.5 | awk '{print int($1+0.5)}'

四舍五入为 3，但是有“。”，没有“，”。

text-processing

7 个回答

  1. Best Answer

    假设您的数字位于文件中numbers，并且您的locale文件使用,小数点，例如fr_FR.UTF-8。我还添加了10000000000作为您的源数字之一，以证明整数结果不会向上舍入：

    export LC_ALL=fr_FR.UTF-8                # Change my locale

awk '
    {
        n=$1*1.03;                       # Multiply input value
        printf "%d\t%f\t", $1, n;        # DEBUG: show input and multiplied values
        if (n>int(n)) { n=int(n)+1 };    # Round up +ve if not an integer value
        print n;                         # Output integer result
    }
' numbers

    如果输入数字可以为负数，则舍入代码需要更复杂，以便舍入到远离零的位置。如果这可能是一个问题，请告诉我，我会提供代码来解决这个问题。

    结果，包括调试列，使用您的数据

    3073771824      3165984978.720000       3165984979
1513517589      1558923116.670000       1558923117
4982173058      5131638249.740000       5131638250
1539400944      1585582972.320000       1585582973
3175320163      3270579767.890000       3270579768
5247018359      5404428909.770000       5404428910
14359014635     14789785074.050001      14789785075
10000000000     10300000000.000000      10300000000

    无需调试，使用您的数据的结果

    3165984979
1558923117
5131638250
1585582973
3270579768
5404428910
14789785075
10300000000

    删除或注释掉该printf行以删除两个调试列。awk如果必须，您可以通过删除注释并连接剩余的行将命令合并到一行中。

    现在，关于语言环境。无论语言环境如何awk，程序都希望其数字常量用作.小数点；这是语法要求。例如，print 3,1打印两个用空格分隔的值 ( 3 1)，但print 3.1打印单个十进制值 ( 3.1)。

    如果您使用的是 GNU，gawk您可以指定-N标志（--use-lc-numeric）让其读取和写入数据值，并使用您的语言环境将字符串转换为数字：

    echo 1000 1,3005 | gawk -N '{ print $1 * $2 }'
1300,5

echo 1000 | gawk -N '{ print "1,03" * $1 }'
1030

    但是，在您的问题中，您正在读取和写入整数值，因此语言环境的小数点并不相关。

    • 7

  2. 使用Miller：

    $ mlr --nidx put '$1 = round($1 * 1.03)' file

    要将数字四舍五入为大整数，可以使用以下命令。

    $ mlr --nidx put '$1 = ceil($1 * 1.03)' file
    • 5

  3. 要清楚的是，在echo 2.5 | awk '{print int($1+0.5)}'您的问题中，awk 代码不是向上舍入到，3而是先相加0.5，然后向下舍入到 3（但已经是 3，因此int()实际上没有舍入）。如果您以 开始，2.4而不是，2.5结果将是2，这3与您预期的向上舍入不同，因为int()总是向下舍入。

    使用任何 awk：

    $ awk '
    function ceil(x,   y) { y=int(x); return(x>y ? y+1 : y) }
    { print ceil($0 * 1.03) }
' file
3165984979
1558923117
5131638250
1585582973
3270579768
5404428910
14789785075

    如果您在语言环境中使用,而不是.作为小数点，则可以在计算中使用1,03而不是，1.03但我不建议这样做（我建议LC_ALL=C默认使用），因为这需要在不同的 awk 变体中使用不同的代码并且并不像听起来那么简单，例如使用 GNU awk 我们需要添加-N以告诉 gawk 为此使用您的语言环境，然后将其写1,03为字符串"1,03"而不是文字数字，并依靠在算术上下文（乘法）中使用它将其转换为数字，因为文字,在 awk 脚本中意味着不同的东西：

    $ LC_ALL='fr_FR' awk -N '
    function ceil(x,   y) { y=int(x); return(x>y ? y+1 : y) }
    { print ceil($0 * "1,03") }
' file
3165984979
1558923117
5131638250
1585582973
3270579768
5404428910
14789785075

    有关更多信息，请参阅https://www.gnu.org/software/gawk/manual/gawk.html#Locale-influences-conversions 。

    不过，一般来说，您要求的是一个ceil()（用于“上限”）函数，如上所示。当您寻找任何类型的舍入函数时，在示例中包含零和负数非常重要，因为很容易出错，因此使用此输入文件：

    $ cat file
1.999999
1.0
0.000001
0
-0.000001
-1.0
-1.999999

    我们可以测试一个ceil()函数：

    $ awk 'function ceil(x, y){y=int(x); return(x>y?y+1:y)} {print $0,ceil($0)}' file
1.999999 2
1.0 1
0.000001 1
0 0
-0.000001 0
-1.0 -1
-1.999999 -1

    以及相反的floor()函数：

    $ awk 'function floor(x, y){y=int(x); return(x<y?y-1:y)} {print $0,floor($0)}' file
1.999999 1
1.0 1
0.000001 0
0 0
-0.000001 -1
-1.0 -1
-1.999999 -2

    上述方法有效，因为int()截断为零（来自 GNU awk 手册）：

    int(x)
    Return the nearest integer to x, located between x and zero and
    truncated toward zero. For example, int(3) is 3, int(3.9) is 3,
    int(-3.9) is -3, and int(-3) is -3 as well.

    因此int()，如果负数已经实现了上限函数的要求，即向上舍入，而如果int()向下舍入为正数，则只需在结果中加 1。

    我0.000001在样本中使用了 等，以避免人们在测试添加一些数字（如0.9然后int()ing）的解决方案时出现假阳性结果。

    另请注意，ceil()可以缩写为：

    function ceil(x){return int(x)+(x>int(x))}

    但是为了清晰起见（结果是 1 还是 0 并不明显x>int(x)）并且为了提高效率（只调用int()一次而不是两次），我按照上面的方法编写了它。

    • 5

  4. 您可以使用一个脚本，其中数字是您的输入。以下是一个有用的函数示例。

    for number in "${numbers[@]}"; do
  result=$(awk -v num="$number" 'BEGIN { printf "%d\n", (num * 1.03 == int(num * 1.03) ? num * 1.03 : int(num * 1.03) + 1) }')

  echo "$result"

done
    • 2

  5. 我当然偏向于使用 Perl，因为它通常是我做事情的首选工具，但除了使用 Bash 本身或更简单的工具（如 ）之外，它们本身无法处理舍入（当然它仍然可以轻松实现，但仍然如此），Perl 可能是使用模块的bc最简单方法。由于 Perl 的工作方式，数字前面的填充将自动且优雅地处理：ceil()POSIX

    perl -MPOSIX -lne 'print(ceil($_ * 1.03))' file

    % cat file
 3073771824
 1513517589
 4982173058
 1539400944
 3175320163
 5247018359
14359014635
% perl -MPOSIX -lne 'print(ceil($_ * 1.03))' file
3165984979
1558923117
5131638250
1585582973
3270579768
5404428910
14789785075

    11如果您希望保留填充（如果结果数字可能超过 11 位，则需要进行调整）：

    perl -MPOSIX -ne 'printf("%11d\n", ceil($_ * 1.03))' file

    % perl -MPOSIX -ne 'printf("%11d\n", ceil($_ * 1.03))' file
 3165984979
 1558923117
 5131638250
 1585582973
 3270579768
 5404428910
14789785075
    • 2

  6. 使用Raku（以前称为 Perl_6）

    ~$ raku -ne 'put ceiling($_ * 1.03)'   file

#OR

~$ raku -ne 'ceiling($_ * 1.03).put'   file

#OR

~$ raku -ne '($_ * 1.03).ceiling.put'  file

    Raku 的使用方式与 @kos 提供的出色 Perl 答案类似。Raku 的ceiling例程是内置的，因此无需在命令行调用任何模块。put调用会为您添加换行符，并且在第一个示例中不需要额外的括号put。

    示例输入：

     3073771824
+3073771824
-3073771824
 1513517589
 4982173058
 1539400944
 3175320163
 5247018359
14359014635

    示例输出：

    3165984979
3165984979
-3165984978
1558923117
5131638250
1585582973
3270579768
5404428910
14789785075

    这就提出了一个问题：如果在输入中发现非整数该怎么办。跳过该行是最简单的方法，但是（如果这会导致列数据错位），可以使用“NaN”之类的占位符。下面演示了两种修复方法（强制转换+$_和测试）：

    ~$ printf '3073771824\n' | raku -ne 'ceiling($_ * 1.03).put;'
3165984979
~$ printf '3073771824\n' | raku -ne 'ceiling($_ * 1.03).put if +$_;'
3165984979


~$ printf '3073771824A\n' | raku -ne 'ceiling($_ * 1.03).put;'
Cannot convert string to number: trailing characters after number in '3073771824⏏A' (indicated by ⏏)
  in block <unit> at -e line 1

~$ printf '3073771824A\n' | raku -ne 'ceiling($_ * 1.03).put if +$_; #no error (line is skipped)'
~$ printf '3073771824A\n' | raku -ne ' +$_ ?? ($_ * 1.03).ceiling.put !! "NaN".put;'
NaN
~$

    https://docs.raku.org/routine/ceiling
    https://raku.org

    • 2

  7. 我已经很久很久没有使用过了awk，而且我学习整数数学的时间就更长了。

    您必须检查您的数字是否没有超出限制，但是......

    x = ((x * 103) + 99) / 100

    x 将返回四舍五入后的 103% 的整数值。

    如果需要从零开始舍入并且可能一开始就有负值，请使用一些逻辑减去99 而不是加 99（对于正值）。

    简单示例：

    1.03% of 50:
 50 * 103 = 5150  ||  5150 + 99 = 5249  ||  5249 / 100 = 52 (integer div aka truncation)

1.03% of 100:
100 * 103 = 10300  ||  10300 + 99 = 10399  ||  10399 / 100 = 103 (no surprise)

1.03% of 101:
101 * 103 = 10403  ||  10403 + 99 = 10502  ||  10502 / 100 = 105 (104.03 ==> 105)

    用一些数字自己尝试一下。

    另外，研究实用程序dc和bc两个简单​​的计算器程序。对于这种简单的数据转换，这些可能比处理丰富的内容更容易awk。

    • 0

相关问题