peeklong

B.N.F

7275

收藏 2013-09-05

悬赏 100 个论坛币已解决

data a;
d=123456;
e=peeklong(addrlong(d),8);
put e=;
run;
返回结果不对。
data a;
d=put(123456,pib8.);
e=peeklong(addrlong(d),8);
put e=;
run;
返回结果对，但是得把数据put格式。
有没有简单的方法呢，如果是一个2000的array，全put一遍太麻烦了，能不能直接
data a;
d=123456;
e=peeklong(addrlong(d),8);
put e=;
run;
就行？

最佳答案

邓贵大查看完整内容

I couldn't get peeklong to work either.

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

邓贵大

2013-9-5 12:02:12

I couldn't get peeklong to work either.

复制代码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

双修阁主の

2013-9-5 16:36:04

直接e=peeklong(addrlong(put(d,pib8.)),8);不可以吗？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-5 17:33:46

双修阁主の发表于 2013-9-5 16:36
直接e=peeklong(addrlong(put(d,pib8.)),8);不可以吗？

直接addr和peek，put不用怎么做

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-6 11:38:04

B.N.F 发表于 2013-9-5 17:33
直接addr和peek，put不用怎么做

在线等

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-6 12:28:10

peeklong是获取二进制编码
data a;
d=put(123456,pib8.);
e=peeklong(addrlong(d),8);
put e=;
run;
这个例子中pib8.就是读二进制编码，所以123456是d的二进制编码，你打开dataset可以看到d的ASCII码“@？”
data a;
d=123456;
e=peeklong(addrlong(d),8);
put e=;
run;

而这个例子123456是d的ASCII，你再用peeklong读他的二进制编码当然不可能是123456！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

点击查看更多内容…

zhou.wen

2013-9-6 12:30:08

你连你自己的code都不理解，问的问题也是没有意义的。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-6 15:42:36

zhou.wen 发表于 2013-9-6 12:28
peeklong是获取二进制编码
data a;
d=put(123456,pib8.);

谢谢！总算有大侠现身啦
那我怎样才能最简便的得到12345呢？
不用array变动，就能直接peeklong出12345
谢谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-6 19:06:24

B.N.F 发表于 2013-9-6 15:42
谢谢！总算有大侠现身啦
那我怎样才能最简便的得到12345呢？
不用array变动，就能直接peeklong出12345
...

那你也得告诉别人你要做什么？你觉得“那我怎样才能简便的得到12345呢？”这样问问题有多少人能懂，先学会怎么提问题吧。。
看下版主怎么叫你提问题吧 @webgu
https://bbs.pinggu.org/thread-2225167-1-1.html
比如，给出原始数据样本

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-7 11:48:12

zhou.wen 发表于 2013-9-6 19:06
那你也得告诉别人你要做什么？你觉得“那我怎样才能简便的得到12345呢？”这样问问题有多少人能懂，先学会 ...

data a;
array a(20000) _temporary_;
do i=1 to 20000;
a(i)=i;
end;
然后就是上面的那些，如果是一个一个put的话，根本不可能的。
而如果直接用的话，ASCII码（我之前不知道那是ASCII），那不就没法计算了吗？
谢谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-7 16:43:01

zhou.wen 发表于 2013-9-6 12:28
peeklong是获取二进制编码
data a;
d=put(123456,pib8.);

我发现你说的不对。。。
我是想通过peeklong取到原来的数字变量的真实值。
你说的ascii没法直接转换，或者不用转换就得到。
我查了帮助文件和网上，也没有。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-7 21:52:19

我的意思是你做这个有什么用？况且也根本不需要一个个put，可以用宏，或者再用一个数组
也可以像下面这样啊。
data a;
do i=1 to 2000;
d=put(i,pib8.);
e=peeklong(addrlong(d),8);
put e=;
output;
end;
run;

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-7 23:13:02

zhou.wen 发表于 2013-9-7 21:52
我的意思是你做这个有什么用？况且也根本不需要一个个put，可以用宏，或者再用一个数组
也可以像下面这样啊 ...

谢谢大侠！
peeklong好像很多高手都不是很熟悉。。。
是这样的，我想把array进行数据共享，这样多个宏和多个data步，就不用重复的set了。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-7 23:14:47

zhou.wen 发表于 2013-9-7 21:52
我的意思是你做这个有什么用？况且也根本不需要一个个put，可以用宏，或者再用一个数组
也可以像下面这样啊 ...

一个是put，如果不用的话，能不能直接读取原始的值呢？peeklong？
另外还有，如果把a(1)的addrlong出来
如何定位到a（100）呢？
谢谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

邓贵大

2013-9-8 00:43:30

DELETE

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-8 10:06:41

邓贵大发表于 2013-9-8 00:43
That shows you how to get a[100]'s address, given the address of a[1].
But still nobody knows w ...

谢谢邓贵大大哥！
我想通过peeklong尽可能读取原始的array的值，比如a（100）=100，我想取100，为了能实现计算，如果ascii也能实现计算，并且计算结果可以变成实数，拜托告诉我！
还有就是，通过a（1）定位实现取得a（100）了，上面的代码学习了！！
谢谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-8 20:35:31

邓贵大发表于 2013-9-8 19:37
I couldn't get peeklong to work either.

7 data _null_;
8          a = 123456.151515;
9          x = peekclong(addrlong(a),8);
10          y = input(x, rb8.);
11          put y=;
12 run;

y=123456.15152
NOTE: “DATA 语句”所用时间（总处理时间）:
   实际时间       0.01 秒
   CPU 时间       0.01 秒
   CPU 时间       0.01 秒

谢谢！！！搞定了！高手！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-8 20:56:19

邓贵大发表于 2013-9-5 12:02
I couldn't get peeklong to work either.

另外邓贵大大哥！
如我不用input转换格式到rb8，x能不能直接用于计算呢？
如果array的话，元素太多，都input会很麻烦
x**2+x-x**9*exp（x）
比如说。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-9 14:22:27

邓贵大发表于 2013-9-8 00:43
That shows you how to get a[100]'s address, given the address of a[1].
But still nobody knows w ...

跟学计算机的牛人讨论了一下
data _null_;
a='123456';
y=peekclong(addrlong(a),8);
put a= y=;
run;
这样就不会出错，说明char类型的存储和读取过程是一样的，但是numeric型的就不一样
data _null_;
a=123456;
y=peeklong(addrlong(a),8);
put a= y=;
run;
这个其实也没有出错，内存中是以浮点型存储的
data _null_;
a=123456.12;
x=put(a,pib8.);
y=peeklong(addrlong(x),8);
put x= y=;
run;
这个例子说明了它存的是浮点型，pibw.d的解释是Reads positive integer binary (fixed-point) values.
无符号的整数
所以经过put之后x已经变成char类型，所以peeklong出来的结果是123456

data _null_;
a = 123456;
x = peekclong(addrlong(a),8);
y = input(x, rb8.);
put x= y=;
run;
这个正确的原因是用了浮点的格式去读rbw.d所以这中方法的答案是正确的

不知道我说的有没有错？请邓老指点

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-9 14:38:58

B.N.F 发表于 2013-9-8 20:56
另外邓贵大大哥！
如我不用input转换格式到rb8，x能不能直接用于计算呢？
如果array的话，元素太多，都 ...

不能！
PEEKCLONG Function
Stores the contents of a memory address in a character variable on 32-bit and 64-bit platforms.
返回的结果是字符
字符是不能直接计算的

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-9 15:09:52

B.N.F 发表于 2013-9-7 23:13
谢谢大侠！
peeklong好像很多高手都不是很熟悉。。。
是这样的，我想把array进行数据共享，这样多个宏和 ...

data步一结束，占用的内存就释放了，这样实现不了数据共享吧

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-9 18:49:08

data _null_;
x=123456.12;
add=addrlong(x);
stand=peekclong(add);
value=input(stand,rb8.);
put add= value=;
call pokelong(put (2.71828, rb8.),add,8);
stand=peekclong(add);
value=input(stand,rb8.);
put value=;
run;
用sas操作内存，还能玩指针。。但是不推荐用。。脚本语言不适合做这种工作

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-10 12:25:17

zhou.wen 发表于 2013-9-9 18:49
data _null_;
x=123456.12;
add=addrlong(x);

非常感谢！
SAS不是脚本语言吧？
peeklong如果是浮点的话，那么是不是直接put保存数据为浮点，然后peeklong就方便多了呢？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-10 14:43:59

B.N.F 发表于 2013-9-10 12:25
非常感谢！
SAS不是脚本语言吧？
peeklong如果是浮点的话，那么是不是直接put保存数据为浮点，然后peek ...

我也不知道它peeklong出来的到底是怎么换算的，感觉input是免不了的

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-10 18:53:04

邓贵大发表于 2013-9-8 00:43
That shows you how to get a[100]'s address, given the address of a[1].
But still nobody knows w ...

data a(drop=i);
array a(1000) $;
do i=1 to 1000;
a(i)=put(i,pib8.);
end;
run;
data b;
array a(1000) $;
set a;
e=addrlong(a(1));
put a(1)= e=;
f=cats('pib',length(e),'.');
g=peeklong(putn(inputn(e,f)+8*(652-1),f),8);
put f= g=;
run;

非常感谢邓贵大大哥，已经学会怎么用了，不过，g的里面能不能简化一些呢？如果是一大堆数据循环的，会不会太麻烦了？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-10 18:53:44

zhou.wen 发表于 2013-9-10 14:43
我也不知道它peeklong出来的到底是怎么换算的，感觉input是免不了的

是不是跟peeklong出来的东西是字符有关？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

sxlion

2013-9-10 22:20:04

B.N.F 发表于 2013-9-7 23:13
谢谢大侠！
peeklong好像很多高手都不是很熟悉。。。
是这样的，我想把array进行数据共享，这样多个宏和 ...

"我想把array进行数据共享，这样多个宏和多个data步，就不用重复的set了。"

这个问题 n年前讨论过，目前没有结论。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-10 23:09:35

sxlion 发表于 2013-9-10 22:20
"我想把array进行数据共享，这样多个宏和多个data步，就不用重复的set了。"

这个问题 n年前讨论过，目 ...

谢谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

B.N.F

2013-9-10 23:10:18

邓贵大发表于 2013-9-8 00:43
That shows you how to get a[100]'s address, given the address of a[1].
But still nobody knows w ...

这个代码为什么通不过呢？

data b;
array a(1000) $ ;
do i=1 to 1000;
a(i)=put(i,pib8.);
end;
e=addrlong(a(1));
call symputx("e",e);
_error_=dosubl( "
data a;
do i=1 to 12;
f=cats('pib',length(&e),'.');
ans=peeklong(putn(inputn(&e,f)+8*(i-1),f),8);
output;
end;
run;
quit;
");
run;

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zhou.wen

2013-9-10 23:10:32

sxlion 发表于 2013-9-10 22:20
"我想把array进行数据共享，这样多个宏和多个data步，就不用重复的set了。"

这个问题 n年前讨论过，目 ...

APP function 据说只有5%的sasor才精通

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

最佳答案

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群