I have a dataset covering a year of daily data (365 rows) with two field: date and price i.e. Date Price 1/1/15. 100 2/1/15. 99 3/1/15. 101 4/1/15. 102 ... ... 31/12/15 115 I want to calculate the highest %increase over any consecutive 7 days over the 365 days. What code could I use to calculate this? ... View more

Hi Is it possible to import data into sas from The following location: https://graphs.coinmarketcap.com/v1/datapoints/bitcoin/1367174841000/1491151745000/ The data is structured in the form [,],[,] ... where the first number in the square bracket is a Unix timestamp and the second number is the historic market capitalisation for a stock. I want to import this and then restructure it so that I have a field with a sas date, another field with a sas time and another field with the market cap. Another complexity is that the the data contains 3 pieces of info and a timestamp against each one: market cap, then price, then volume.... and I want my dataset to have these as fields. Is this possible! Thanks ... View more

  Hi    I posted a question a couple of years ago (link below). I needed help on an algorithm for ranking poker hand values. Haikuo responded with an excellent algorithm which worked perfectly at the time. You will see in the link below he has included code that can be copied and pasted into sas and run straight away. I had to make some adjustments in cases where the code was garbled (see picture attached for example - i replaced the dot with [*]). When I run the code now I get an error. So I copied the solution code into sas, replaced garbled text and then ran the program (which worked a couple of years ago). I don't have the sas program I used before so I'm desperately trying to recreate it. I've spent a few hours at this so far but I keep getting errors, I have attached an screenshot showing the error I am getting.    Can someone try to copy and paste the same code, correct for the garbled text (I think it only involves replacing the dot in the attached picture file "Capture).    Many thanks     https://communities.sas.com/t5/SAS-Procedures/Allocating-Values-to-Poker-Hands/td-p/146459   Here is the first part pf the code. The error occurs afte the last statement.    DATA CAT; INPUT SUIT :$1. @@; CARDS; S C H D ; DATA SEQ; INPUT NUM :$2. @@; CARDS; 14 13 12 11 10 09 08 07 06 05 04 03 02 ; PROC SQL NOPRINT; SELECT DISTINCT QUOTE(CATS(SUIT,NUM)) INTO :HANDS SEPARATED BY ' ' FROM CAT, SEQ; QUIT; /*EMBED RANKING ALGORITHM INTO THE FOLLOWING MACRO*/ %MACRO SIM; DO Z=1 TO 5; FST(Z)=FIRST(C(Z)); NUM(Z)=INPUT(COMPRESS(C(Z),,'KD'),2.); END; CALL SORTC (OF FST(*)); CALL SORTN (OF NUM(*)); /*STRAIGHT FLUSH*/ IF FST(1)=FST(5) AND NUM(5)-NUM(4)=1 AND NUM(4)-NUM(3)=1 AND NUM(3)-NUM(2)=1 AND NUM(2)-NUM(1)=1 THEN DO; RANK1=9; RANK2=NUM(5); RANK3=999; RANK4=999; RANK5=999; RANK6=999; END; ELSE IF FST(1)=FST(5) AND NUM(1)=2 AND NUM(2)=3 AND NUM(3)=4 AND NUM(4)=5 AND NUM(5)=14 THEN DO; RANK1=9; RANK2=NUM(4); RANK3=999; RANK4=999; RANK5=999; RANK6=999; END; /*FOUR OF A KIND*/ ELSE IF NUM(1)=NUM(4) OR NUM(2)=NUM(5) THEN DO; RANK1=8; IF NUM(1)=NUM(4) THEN DO; RANK2=NUM(1); RANK3=NUM(5); RANK4=999; RANK5=999; RANK6=999; END; ELSE IF NUM(2)=NUM(5) THEN DO; RANK2=NUM(2); RANK3=NUM(1); RANK4=999; RANK5=999; RANK6=999; END; END; /*FULL HOUSE*/ ELSE IF (NUM(1)=NUM(2) AND NUM(3)=NUM(5)) OR (NUM(1)=NUM(3) AND NUM(4)=NUM(5)) THEN DO; RANK1=7; IF (NUM(1)=NUM(2) AND NUM(3)=NUM(5)) THEN DO; RANK2=NUM(3); RANK3=NUM(1); RANK4=999; RANK5=999; RANK6=999; END; ELSE IF (NUM(1)=NUM(3) AND NUM(4)=NUM(5)) THEN DO; RANK2=NUM(1); RANK3=NUM(4); RANK4=999; RANK5=999; RANK6=999; END; END; /*FLUSH*/ ELSE IF FST(1)=FST(5) THEN DO; RANK1=6; RANK2=NUM(5); RANK3=NUM(4); RANK4=NUM(3); RANK5=NUM(2); RANK6=NUM(1); END; /*STRAIGHT*/ ELSE IF NUM(5)-NUM(4)=1 AND NUM(4)-NUM(3)=1 AND NUM(3)-NUM(2)=1 AND NUM(2)-NUM(1)=1 THEN DO; RANK1=5; RANK2=NUM(5); RANK3=999; RANK4=999; RANK5=999; RANK6=999; END; ELSE IF NUM(1)=2 AND NUM(2)=3 AND NUM(3)=4 AND NUM(4)=5 AND NUM(5)=14 THEN DO; RANK1=5; RANK2=NUM(4); RANK3=999; RANK4=999; RANK5=999; RANK6=999; END; /*THREE OF A KIND*/ ELSE IF (NUM(1)=NUM(3) OR NUM(2)=NUM(4) OR NUM(3)=NUM(5)) THEN DO; RANK1=4; IF NUM(1)=NUM(3) THEN DO; RANK2=NUM(1); RANK3=NUM(5); RANK4=NUM(4); RANK5=999; RANK6=999; END; IF NUM(2)=NUM(4) THEN DO; RANK2=NUM(2); RANK3=NUM(5); RANK4=NUM(1); RANK5=999; RANK6=999; END; IF NUM(3)=NUM(5) THEN DO; RANK2=NUM(3); RANK3=NUM(2); RANK4=NUM(1); RANK5=999; RANK6=999; END; END; /*TWO PAIR*/ ELSE IF (NUM(1)=NUM(2) AND NUM(3)=NUM(4)) OR (NUM(1)=NUM(2) AND NUM(4)=NUM(5)) OR (NUM(2)=NUM(3) AND NUM(4)=NUM(5)) THEN DO; RANK1=3; IF (NUM(1)=NUM(2) AND NUM(3)=NUM(4)) THEN DO; RANK2=NUM(3); RANK3=NUM(1); RANK4=NUM(5); RANK5=999; RANK6=999; END; IF (NUM(1)=NUM(2) AND NUM(4)=NUM(5)) THEN DO; RANK2=NUM(5); RANK3=NUM(1); RANK4=NUM(3); RANK5=999; RANK6=999; END; IF (NUM(3)=NUM(2) AND NUM(5)=NUM(4)) THEN DO; RANK2=NUM(5); RANK3=NUM(3); RANK4=NUM(1); RANK5=999; RANK6=999; END; END; /*ONE PAIR*/ ELSE IF NUM(1)=NUM(2) OR NUM(2)=NUM(3) OR NUM(3)=NUM(4) OR NUM(4)=NUM(5) THEN DO; RANK1=2; IF NUM(1)=NUM(2) THEN DO; RANK2=NUM(1); RANK3=NUM(5); RANK4=NUM(4); RANK5=NUM(3); RANK6=999; END; IF NUM(2)=NUM(3) THEN DO; RANK2=NUM(3); RANK3=NUM(5); RANK4=NUM(4); RANK5=NUM(1); RANK6=999; END; IF NUM(3)=NUM(4) THEN DO; RANK2=NUM(4); RANK3=NUM(5); RANK4=NUM(2); RANK5=NUM(1); RANK6=999; END; IF NUM(4)=NUM(5) THEN DO; RANK2=NUM(5); RANK3=NUM(3); RANK4=NUM(2); RANK5=NUM(1); RANK6=999; END; END; /*HIGH CARD*/ ELSE DO; RANK1=1; RANK2=NUM(5); RANK3=NUM(4); RANK4=NUM(3); RANK5=NUM(2); RANK6=NUM(1); END; %MEND; /*SCORE ALL OF THE COMBINATIONS*/ data HANDS; array c[5] $3; array x[52] $3 (&HANDS.); array i[5]; ARRAY NUM(5) num1-num5; ARRAY FST(5) $ 1 fst1-fst5; n=dim(x); k=dim(i); i[1]=0; ncomb=comb(n,k); do j=1 to ncomb; call allcombi(n, k, of i[*]); do h=1 to k; c=x[i]; end; %SIM OUTPUT; end; KEEP C: RANK: num:; run;     ... View more

 A couple of years ago, I got some advice on coding and the below code worked perfectly but now when I run it I get an error message that says:   The execution of this query involves performing one or more Cartesian product joins that can not be optimized   I'm not sure why it's not working for me now. Before, I just copied it into SAS (not sure what version I was using at the time) but now it doesn't work.    Any help would be much appreciated.  Thansk   DATA CAT; INPUT SUIT :$1. @@; CARDS; S C H D ; DATA SEQ; INPUT NUM :$2. @@; CARDS; 14 13 12 11 10 09 08 07 06 05 04 03 02 ; PROC SQL NOPRINT; SELECT DISTINCT QUOTE(CATS(SUIT,NUM)) INTO :HANDS SEPARATED BY ' ' FROM CAT, SEQ; QUIT; ... View more

    Hi    I've been working on this for a while now (using Lag function) but i'm not getting anywhere.   Bascially, the dataset is sorted by scrape time. They are all bets and assume that after the event the stake is returned to my account. So my capital to start is 10000. In the first row my capital is 10000-stake. In the second row, I need to look back to the first row. Using lag If the first event is over then my stake is returned.    Here is my code:   data WORK.DATASET; infile datalines dsd truncover; input stake:32. scrapetime: DATETIME14. eventtime: DATETIME14.; datalines4; 52,15SEP16:16:25,15SEP16:16:40 18,15SEP16:16:51,15SEP16:17:20 15,15SEP16:16:52,15SEP16:16:57 13,15SEP16:16:57,15SEP16:17:45 117,15SEP16:17:04,16SEP16:15:30 1188,15SEP16:17:04,15SEP16:17:10 562,15SEP16:17:34,15SEP16:17:40 28,15SEP16:17:34,15SEP16:17:50 422,15SEP16:17:47,15SEP16:18:20 806,15SEP16:17:53,15SEP16:19:50 129,15SEP16:17:59,15SEP16:18:10 37,15SEP16:18:25,15SEP16:18:30 32,15SEP16:18:46,15SEP16:19:01 26,15SEP16:18:48,15SEP16:19:01 74,15SEP16:19:06,15SEP16:19:11 90,15SEP16:19:29,15SEP16:19:45 13,15SEP16:19:41,15SEP16:19:47 ;;;;   data _NULL_; if 0 then set dataset nobs=n; call symputx('nrows',n); stop; run;   %let initialcapital=10000;   %macro test; data test; set dataset; if _n_ = 1 then do; running_capital = &initialcapital - stake; end; else do;   %do look_back=1 %to &nrows; if lag&look_back.(eventtime) < scrapetime then running_capital = running_capital+lag&look_back.(stake); %end; running_capital = running_capital - stake; %end; run; %mend; %test; ... View more