Linlin Tracker

Re: How to put sas outputs into word file?

Linlin — Sat, 08 Sep 2018 20:33:09 GMT

Hi VDD,

Thank you for your quick reply! when I run the code below I would like the outcome of proc freq going to the word file directly, so I don't have to type in the numbers.

proc freq data=have;
tables hypertension/missing;
where group=1;
run;

group=1 group=2

Hypertension
Yes	3/9 (33%)	3/9 (33%)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
No	3/9 (33%)	3/9 (33%)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
Missing	3/9 (33%)	3/9 (33%)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)

How to put sas outputs into word file?

Linlin — Sat, 08 Sep 2018 20:03:21 GMT

Hi All,

How to write sas output into word file?

Thank you very much for your help!

data have;
input group hypertension;
cards;
1 1
1 0
1 .
1 1
1 0
1 .
1 1
1 0
1 .
2 1
2 0
2 .
2 1
2 0
2 .
2 1
2 0
2 .
;
proc print;run;

	group1	group2	group3	group4	Total
Smoking Status
Never	270/603(45%)	231/457(51%)	235/603(39%)	202/457(44%)	724/2120(34%)
Past	275/603(45%)	201/457(44%)	309/603(51%)	225/457(49%)	1018/2120(48%)
Current	47/603(8%)	19/457(4%)	35/603(6%)	17/457(4%)	118/2120(6%)
Missing	11/603(2%)	6/457(1%)	24/603(4%)	13/457(3%)	268/2120(12%)

Physical Activity
Yes	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
No	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
Missing	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)

Hypertension
Yes	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
No	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)
Missing	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)	xx/xx (xx)

Re: missing data

Linlin — Wed, 04 Nov 2015 20:44:40 GMT

Hi Haikuo, Art, and PG,

Thank you very much for your great help!! I miss you guys too.

Best wishes!

Linlin

missing data

Linlin — Tue, 03 Nov 2015 23:05:37 GMT

Hi All

How could I get dataset WANT from HAVE? Thank you!

data have;
input id$ count var1;
cards;
aa 1 20
aa 2 .
aa 3 30
bb 1 10
bb 2 .
bb 3 .
bb 4 20
cc 1 10
cc 2 .
cc 3 30
cc 4 .
cc 5 50
;

data want;

id count var1
aa 1 20
aa 2 25
aa 3 30
bb 1 10
bb 2 15
bb 3 15
bb 4 20
cc 1 10
cc 2 20
cc 3 30
cc 4 40
cc 5 50

Re: Congratulations Fareeza!

Linlin — Mon, 05 Jan 2015 18:09:14 GMT

Too bad Art is the top poster again! Happy New Year everyone!

Re: Capturing the last character in a variable value

Linlin — Mon, 23 Jun 2014 19:51:14 GMT

data have;

input lpct;

cards;

2.5

;

data want;

set have;

if first(reverse(lpct)) in ('0','5') then rounded=1;

else rounded=0;

proc print;run;

Re: How to split one string into multiple rows?

Linlin — Thu, 19 Jun 2014 15:10:10 GMT

data a;

length a $5;

a='a,b';

output;

a='c,d,e';

output;

data want;

set a;

length b $1;

i=1;

do while (scan(a,i) ne ' ');

b=scan(a,i);

output;

i+1;

end;

keep b;

proc print;run;

Re: can't insert date macro into SQL

Linlin — Wed, 04 Jun 2014 15:02:28 GMT

Reeza is She.

Re: Two consecutive visit records, Flag first record

Linlin — Tue, 20 May 2014 18:16:38 GMT

example:

data have;

input id vismon alt;

cards;

1 1 0

1 4 0

2 60 0

2 72 1

2 84 1

2 96 1

;

data want;

set have;

length new $1;

by id alt;

if alt=1 and first.alt and not last.alt then new='Y';

proc print;run;

Re: First and last day of month using Macros in proc sql

Linlin — Mon, 19 May 2014 19:04:42 GMT

tested:

Proc Sql;

Create table work.want as

Select * from Work.have

Where report_date between intnx('month',%sysfunc(inputn(&month_key,yymmn6.)),0,'b') and intnx('month',%sysfunc(inputn(&month_key,yymmn6.)),0,'e');

Quit;

Proc Sql;

Create table work.want2 as

Select * from Work.have

Where report_date between intnx('month',input("&month_key",yymmn6.),0,'b') and intnx('month',input("&month_key",yymmn6.),0,'e');

Quit;

Re: First and last day of month using Macros in proc sql

Linlin — Mon, 19 May 2014 18:09:43 GMT

data have;
input Account_id        Report_date : date9.;
format report_date date9.;
cards;
1                           12JUN2013
2                            17JAN2014
3                            19MAY2014
;

%let month_key=201405;

Proc Sql;
Create table work.want as
Select * from Work.have
Where year(report_date)=%substr(&month_key,1,4) and month(report_date)=%substr(&month_key,5);
Quit;

Re: Is it possible to make a list in macro statements?

Linlin — Fri, 16 May 2014 19:04:18 GMT

you could create a macro:

data have;
input date mmddyy10.;
format date mmddyy10.;
cards;
1/1/2001
2/1/2001
1/1/2002
1/1/2006
;

proc sql noprint;
select distinct year(date) into :year separated by ' '
from have;
quit;

%macro test;
%do i=1 %to %sysfunc(countw(&year));
%let n=%scan(&year,&i);
data have&n;
set have(where=(year(date)=&n));
run;
%end;
%mend;
%test

Re: Look up values

Linlin — Fri, 16 May 2014 18:28:20 GMT

example:

proc sql noprint;

select max(weight) , min(weight) into

:max_wt,:min_wt

from sashelp.class;

quit;

%put &max_wt;

%put &min_wt;

Re: Renaming the files in folder

Linlin — Fri, 16 May 2014 14:48:01 GMT

Art,

To rename "test00502.xlsx" to "test140502.xlsx", I changed your code to:

%let dir=c:\temp\;

filename x pipe "dir &dir.*.xlsx /b";

data test;

infile x length=len;

input name : $varying40. len;

if length(scan(name,1,'.'))=9 then do;

oldname=catt("&dir.",name);

newname=catt("&dir.test",'14',substr(name,6));

rc=rename(oldname, newname, 'file');

end;

run;

obs name oldname newname rc

   1     144est0050200000000.xlsx                                                          .
   2     Copy                                                                              .
   3     test00502.xlsx              c:\temp\test00502.xlsx    c:\temp\test140502.xlsx     0

Re: Renaming the files in folder

Linlin — Fri, 16 May 2014 14:19:40 GMT

Hi Art,

log file from your code:

NOTE: SAS initialization used:

real time 11.77 seconds

cpu time 1.40 seconds

1 %let dir=c:\temp\;

3 filename x pipe "dir &dir.*.xlsx /b";

5 data _null_;

7 infile x length=len;

9 input name : $varying40. len;

11 if len=10 then do;

13 oldname=catt("&dir.",name);

15 newname=catt("&dir.",'14',substr(name,2));

17 rc=rename(oldname, newname, 'file');

19 end;

21 run;

NOTE: The infile X is:

Unnamed Pipe Access Device,

PROCESS=dir c:\temp\*.xlsx /b,RECFM=V,

LRECL=256

NOTE: 3 records were read from the infile X.

The minimum record length was 8.

The maximum record length was 17.

NOTE: DATA statement used (Total process time):

real time 0.40 seconds

cpu time 0.03 seconds

Re: Create a new variable based on value of a specific observation in another variable

Linlin — Tue, 06 May 2014 20:34:50 GMT

Hi Tom,

You are not alone, I didn’t know about the GEODIST function neither.Thanks to PG we all know now. I strongly suggest H mark PG’s answer as correct answer.

Re: do loop

Linlin — Tue, 06 May 2014 16:02:05 GMT

data GroupA;

input Set :units;

group='a';

cards;

1 5

2 6

3 4

;

data Groupb;

input Set :units;

group='b';

cards;

1 4

2 8

3 12

5 5

;

data Groupc;

input Set :units;

group='c';

cards;

1 3

2 4

3 16

4 8

;

data have;

set group:;

proc sort; by set group;run;

data want;

set have;

do _n_=1 to 1;

if t>300 then leave;

t+units;

output;

end;

proc print;run;

Re: Create a new variable based on value of a specific observation in another variable

Linlin — Mon, 05 May 2014 20:20:44 GMT

data have;
input Group    : x1 y1;
cards;
1               3 5
2               6 5
3               1 2
4               0 4
5               1 7
6               7 1
7               2 9
;
data _null_;
set have(where=(group in (2,6)));
call symputx(cats('x_group',group),x1);
call symputx(cats('y_group',group),y1);

data want;
set have;
x2=&x_group2;
y2=&y_group2;
x3=&x_group6;
y3=&y_group6;
proc print;run;

Obs    Group    x1    y1    x2    y2    x3    y3
1          1        3     5     6     5     7     1
2          2        6     5     6     5     7     1
3          3        1     2     6     5     7     1
4          4        0     4     6     5     7     1
5          5        1     7     6     5     7     1
6          6        7     1     6     5     7     1
7          7         2     9     6     5     7     1

Re: Create a new variable based on value of a specific observation in another variable

Linlin — Mon, 05 May 2014 19:40:01 GMT

data have;
input Group    : Group_Value;
cards;

1               3
2               6
3               1
4               0
5               1
6               7
7               2
;
data _null_;
set have(where=(group=2));
call symputx('group2',group_value);

data want;
set have;
x2=&group2;
proc print;run;

Re: Congratulations Fareeza

Linlin — Fri, 02 May 2014 19:38:10 GMT

Art,

You are too late. I am the winner:smileylaugh::smileylaugh::smileylaugh:!