主页 / coding / 问题 / 78114209
Accepted
NewUsr_stat
Asked: 2024-03-06 20:03:04 +0800 CST

转换为十进制防止修剪 0

  • 772

我遇到的情况与此处报告的情况类似：https ://communities.sas.com/t5/New-SAS-User/Transform-integer-into-decimal/mp/918994#M41156

假设有以下数据（都是数字，而不是字符）：

data have;
input Hosp1 Hosp2 ;
cards;
71515   42731
48041 5761
4329    481
85201  42731
85220   5119
4280  40211
2510   4280
39   22
;
run;

我想要的是以下输出：

在此输入图像描述

如果我尝试使用此代码（来自 yabwon）：

data want;
set have;
array H hosp1 hosp2;
do over H;
  H = H/(10**max(0,ceil(log10(H))-3)); 
 end;
 format hosp1 hosp2 best.;
 run;

输出如下：

在此输入图像描述

换句话说，4280 变成了 428，但我想要 428.0 与 2510 相同。有没有办法防止它？

先感谢您

sas

3 个回答

  1. Best Answer

    428 代表的数字和 428.0 代表的数字没有区别。

    小数点后的尾随零是有意义的，那么您需要将该值存储为字符串。（请注意，无需为仅两个变量使用 ARRAY 而烦恼。）

    data want;
  set have;
  length chosp1 chosp2 $8 ;
  chosp1 = put(hosp1,7.-L);
  chosp1 = substr(chosp1,1,3)||'.'||substr(chosp1,4);
  chosp2 = put(hosp2,7.-L);
  chosp2 = substr(chosp2,1,3)||'.'||substr(chosp2,4);
run;
    • 1

  2. 您可以使用自定义PICTURE格式。

    例子：

    proc format;
  picture mypic 
    10000-99999 = '999.99' (mult=1)
     1000- 9999 = '999.9'  (mult=1)
      100-  999 = '99.9'   (mult=1)
/*       10-   99 = '9.9'    (mult=1)*/
  ;
run;


data have;
input Hosp1 Hosp2 ;
format hosp1-hosp2 mypic.;
put hosp1 hosp2 ;
cards;
71515   42731
48041 5761
4329    481
85201  42731
85220   5119
4280  40211
2510   4280
39   22
;
run;

    日志

    715.15 427.31
480.41 576.1
432.9 48.1
852.01 427.31
852.20 511.9
428.0 402.11
251.0 428.0
39 22
    • 0

  3. 你想要的是字符变量，而不是数值变量；这是唯一可以完全满足您的要求的东西。

    处理这个问题的方法是保留真实的数字，然后将宽度和小数长度存储在其他字段中；然后使用put带有这些变量的函数将最终结果存储在字符字段中。

    SAS 数字是浮点小数，而不是 Decimal 类型。

    另一种选择是使用 DS2，它具有Decimal 类型。

    https://documentation.sas.com/doc/en/vdmmlcdc/8.1/ds2pg/n0v130wmh3hmuzn1t7y5y4pgxa69.htm

    小数|数字( p, s)

    存储带符号的、精确的、定点十进制数，具有用户指定的精度和小数位数。精度和小数位决定了小数点的位置。精度是小数点左右可以存储的最大位数，范围是 1 到 52。小数位数是小数点后面可以存储的最大位数。小数位数必须小于或等于精度。例如，decimal(9,2) 存储最多九位的十进制数，其中包含两位定点小数部分，例如 1234567.89。

    • 0

相关问题