Skip to main content
Search type Search syntax
Tags [tag]
Exact "words here"
Author user:1234
user:me (yours)
Score score:3 (3+)
score:0 (none)
Answers answers:3 (3+)
answers:0 (none)
isaccepted:yes
hasaccepted:no
inquestion:1234
Views views:250
Code code:"if (foo != bar)"
Sections title:apples
body:"apples oranges"
URL url:"*.example.com"
Saves in:saves
Status closed:yes
duplicate:no
migrated:no
wiki:no
Types is:question
is:answer
Exclude -[tag]
-apples
For more details on advanced search visit our help page
Results tagged with
Search options not deleted user 17581

Code-golf is a competition to solve a particular problem in the fewest bytes of source code.

4 votes

Shortest power set implementation

awk (82) {for(;i<2^NF;i++){for(j=0;j<NF;j++)if(and(i,(2^j)))printf "%s ",$(j+1);print ""}} assume saved in file powerset.awk, usage $ echo 1 2 3 | awk -f powerset.awk 1 2 1 2 3 1 3 2 3 1 2 3 ps …
karakfa's user avatar
  • 171
2 votes

Finding Local Extremes

Haskell 50 f a=[x|(p,x,n)<-zip3 a(tail a)(drop 2 a),x>p&&x>n]
karakfa's user avatar
  • 171