BookmarkSubscribeRSS Feed
☑ This topic is solved. Need further help from the community? Please sign in and ask a new question.
animesh123
Obsidian | Level 7

String = A Math B Cook V Deep .

Is there a way to get the output ABV using Compress function.

1 ACCEPTED SOLUTION

Accepted Solutions
Tom
Super User Tom
Super User

No. 

 

That is NOT what COMPRESS() does.  It removes individual characters. So to get that result using COMPRESS() you would have to remove any character that wasn't A,B or V. Which would work for that one example, but I doubt it would work for other strings you might have.

 

If the pattern is single letter followed by single word then use SCAN() function in a loop.

data test;
   String = 'A Math B Cook V Deep';
   length next_word new_string $10 ;
   do i=1 by 2 until(next_word=' ');
     next_word=scan(string,i,' ');
     new_string=cats(new_string,next_word);
   end;
   drop i next_word;
run;

If the pattern is more complex 'D Earth Science E Chemistry' then you will need something more complicated.

 

If the goal is to find single uppercase letters then then perhaps something like:

data test;
   String = 'A Math B Cook V Deep';
   length next_word new_string $10 ;
   do i=1 to countw(string,' ');
     next_word=scan(string,i,' ');
     if length(next_word)=1 and 'A' <= next_word <= 'Z' then
       new_string=cats(new_string,next_word)
     ;
   end;
   drop i next_word;
run;

If not then you will probably need to use regular expressions instead.  

 

So if the pattern is remove any word that is more than one character then try

data test;
   String = 'A Math B Cook V Deep';
   length new_string $10 ;
   new_string=compress(prxchange('s/[^ ]{2,}//',-1,string),' ');
run;

 

View solution in original post

2 REPLIES 2
Tom
Super User Tom
Super User

No. 

 

That is NOT what COMPRESS() does.  It removes individual characters. So to get that result using COMPRESS() you would have to remove any character that wasn't A,B or V. Which would work for that one example, but I doubt it would work for other strings you might have.

 

If the pattern is single letter followed by single word then use SCAN() function in a loop.

data test;
   String = 'A Math B Cook V Deep';
   length next_word new_string $10 ;
   do i=1 by 2 until(next_word=' ');
     next_word=scan(string,i,' ');
     new_string=cats(new_string,next_word);
   end;
   drop i next_word;
run;

If the pattern is more complex 'D Earth Science E Chemistry' then you will need something more complicated.

 

If the goal is to find single uppercase letters then then perhaps something like:

data test;
   String = 'A Math B Cook V Deep';
   length next_word new_string $10 ;
   do i=1 to countw(string,' ');
     next_word=scan(string,i,' ');
     if length(next_word)=1 and 'A' <= next_word <= 'Z' then
       new_string=cats(new_string,next_word)
     ;
   end;
   drop i next_word;
run;

If not then you will probably need to use regular expressions instead.  

 

So if the pattern is remove any word that is more than one character then try

data test;
   String = 'A Math B Cook V Deep';
   length new_string $10 ;
   new_string=compress(prxchange('s/[^ ]{2,}//',-1,string),' ');
run;

 

Ready to join fellow brilliant minds for the SAS Hackathon?

Build your skills. Make connections. Enjoy creative freedom. Maybe change the world. Registration is now open through August 30th. Visit the SAS Hackathon homepage.

Register today!
Mastering the WHERE Clause in PROC SQL

SAS' Charu Shankar shares her PROC SQL expertise by showing you how to master the WHERE clause using real winter weather data.

Find more tutorials on the SAS Users YouTube channel.

Discussion stats
  • 2 replies
  • 467 views
  • 0 likes
  • 3 in conversation