<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Array that perform this in SAS Procedures</title>
    <link>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230451#M54493</link>
    <description>&lt;P&gt;Can be done with a double do loop:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;CODE class=" language-sas"&gt;
data ABC;
do until(done);
    set a end=done;
    totSum + B;
    end;
done = 0;
do until(done);
    set a end=done;
    if A then C = totSum; else C = B;
    output;
    totSum + (-B);
    end;
keep A B C;
run;

proc print data=ABC noobs; run;&lt;/CODE&gt;&lt;/PRE&gt;</description>
    <pubDate>Sun, 18 Oct 2015 01:27:29 GMT</pubDate>
    <dc:creator>PGStats</dc:creator>
    <dc:date>2015-10-18T01:27:29Z</dc:date>
    <item>
      <title>Array that perform this</title>
      <link>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230449#M54492</link>
      <description>&lt;P&gt;Hello I have this data that I wish to createABC from Data AB &amp;nbsp;as follows:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Data A;&lt;/P&gt;
&lt;P&gt;imput A B;&lt;/P&gt;
&lt;P&gt;cards;&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp; 3&lt;/P&gt;
&lt;P&gt;0 &amp;nbsp; 6&lt;/P&gt;
&lt;P&gt;0 &amp;nbsp; 7&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp;9&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp;4&lt;/P&gt;
&lt;P&gt;0 &amp;nbsp;2&lt;/P&gt;
&lt;P&gt;;&lt;/P&gt;
&lt;P&gt;run;&lt;/P&gt;
&lt;P&gt;Data ABC;&lt;/P&gt;
&lt;P&gt;input A B C;&lt;/P&gt;
&lt;P&gt;cards;&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp; 3 &amp;nbsp; C=3+6+7+9+4+2=31&lt;/P&gt;
&lt;P&gt;0 &amp;nbsp;6 &amp;nbsp; C=6&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp;9 &amp;nbsp; C=9+4+2=15&lt;/P&gt;
&lt;P&gt;1 &amp;nbsp;4 &amp;nbsp; C=4+6&lt;/P&gt;
&lt;P&gt;0 &amp;nbsp; 2 &amp;nbsp;C=2&lt;/P&gt;
&lt;P&gt;;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;Thanks&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sun, 18 Oct 2015 00:34:36 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230449#M54492</guid>
      <dc:creator>desireatem</dc:creator>
      <dc:date>2015-10-18T00:34:36Z</dc:date>
    </item>
    <item>
      <title>Re: Array that perform this</title>
      <link>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230451#M54493</link>
      <description>&lt;P&gt;Can be done with a double do loop:&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;PRE&gt;&lt;CODE class=" language-sas"&gt;
data ABC;
do until(done);
    set a end=done;
    totSum + B;
    end;
done = 0;
do until(done);
    set a end=done;
    if A then C = totSum; else C = B;
    output;
    totSum + (-B);
    end;
keep A B C;
run;

proc print data=ABC noobs; run;&lt;/CODE&gt;&lt;/PRE&gt;</description>
      <pubDate>Sun, 18 Oct 2015 01:27:29 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230451#M54493</guid>
      <dc:creator>PGStats</dc:creator>
      <dc:date>2015-10-18T01:27:29Z</dc:date>
    </item>
    <item>
      <title>Re: Array that perform this</title>
      <link>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230486#M54498</link>
      <description>&lt;P&gt;Hi, no array but another way&amp;nbsp; ...&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;data a;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;input a b @@;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;datalines;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;1 3 0 6 0 7 1 9 1 4 0 2&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;* place sum of values of variable B in macro variable &amp;amp;TOT;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;proc sql noprint;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;select sum(b) into :tot from a;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;quit;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;data want (keep=a b c);&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;set a;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;cumb + lag(b);&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;c = a*(&amp;amp;tot-cumb) + ^a*b;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;run;&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P&gt;&amp;nbsp;&lt;/P&gt;
&lt;P&gt;data set WANT ...&lt;/P&gt;
&lt;P&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;Obs&amp;nbsp;&amp;nbsp;&amp;nbsp; a&amp;nbsp;&amp;nbsp;&amp;nbsp; b&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; c&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;1&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 1&amp;nbsp;&amp;nbsp;&amp;nbsp; 3&amp;nbsp;&amp;nbsp;&amp;nbsp; 31&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;2&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 0&amp;nbsp;&amp;nbsp;&amp;nbsp; 6&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 6&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;3&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 0&amp;nbsp;&amp;nbsp;&amp;nbsp; 7&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 7&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;4&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 1&amp;nbsp;&amp;nbsp;&amp;nbsp; 9&amp;nbsp;&amp;nbsp;&amp;nbsp; 15&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;5&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 1&amp;nbsp;&amp;nbsp;&amp;nbsp; 4&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 6&lt;/STRONG&gt;&lt;/FONT&gt;&lt;BR /&gt;&lt;FONT face="courier new,courier"&gt;&lt;STRONG&gt;&amp;nbsp;6&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 0&amp;nbsp;&amp;nbsp;&amp;nbsp; 2&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 2&lt;/STRONG&gt;&lt;/FONT&gt;&lt;/P&gt;</description>
      <pubDate>Sun, 18 Oct 2015 16:24:37 GMT</pubDate>
      <guid>https://communities.sas.com/t5/SAS-Procedures/Array-that-perform-this/m-p/230486#M54498</guid>
      <dc:creator>MikeZdeb</dc:creator>
      <dc:date>2015-10-18T16:24:37Z</dc:date>
    </item>
  </channel>
</rss>

