Rosetta Code/Count examples: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Adjust matcher to catch oddball header markup.) |
No edit summary |
||
Line 1,269: | Line 1,269: | ||
put "Total" & comma & allTaskTotal after fld "tasks" |
put "Total" & comma & allTaskTotal after fld "tasks" |
||
end mouseUp</lang> |
end mouseUp</lang> |
||
=={{header|Maple}}== |
|||
<lang Maple>ConvertUTF8 := proc( str ) |
|||
local i, tempstring, uniindex; |
|||
try |
|||
tempstring := str; |
|||
uniindex := [StringTools:-SearchAll("\u",str)]; |
|||
if uniindex <> [] then |
|||
for i in uniindex do |
|||
tempstring := StringTools:-Substitute(tempstring, str[i..i+5], UTF8:-unicode(str[i+2..i+5])); |
|||
end do: |
|||
end if; |
|||
return tempstring; |
|||
catch: |
|||
return str; |
|||
end try; |
|||
end proc: |
|||
print_examples := proc(lst) |
|||
local task, count, url, headers, item; |
|||
for task in lst do |
|||
count := 0: |
|||
url := cat("http://www.rosettacode.org/mw/index.php?title=", StringTools:-Encode(StringTools:-SubstituteAll(task["title"], " ", "_"), 'percent'), "&action=raw"): |
|||
headers := [StringTools:-SearchAll("=={{header|",URL:-Get(url))]: |
|||
for item in headers do |
|||
count++: |
|||
end do: |
|||
printf("%s has %d examples\n",ConvertUTF8(task["title"]), count); |
|||
end do: |
|||
end proc: |
|||
x := JSON:-ParseFile("http://rosettacode.org/mw/api.php?action=query&list=categorymembers&cmtitle=Category:Programming_Tasks&cmlimit=20&format=json"): |
|||
print_examples(x["query"]["categorymembers"]); |
|||
while(assigned(x["continue"]["cmcontinue"])) do |
|||
continue := x["continue"]["cmcontinue"]: |
|||
more_tasks:= cat("http://rosettacode.org/mw/api.php?action=query&list=categorymembers&cmtitle=Category:Programming_Tasks&cmlimit=20&format=json", "&continue=", x["continue"]["continue"], "&cmcontinue=", x["continue"]["cmcontinue"]): |
|||
x := JSON:-ParseFile(more_tasks): |
|||
print_examples(x["query"]["categorymembers"]); |
|||
end do: |
|||
</lang> |
|||
{{Out|Output}} |
|||
<pre> |
|||
100 doors has 267 examples |
|||
15 Puzzle Game has 42 examples |
|||
15 puzzle solver has 4 examples |
|||
2048 has 34 examples |
|||
24 game has 88 examples |
|||
24 game/Solve has 54 examples |
|||
4-rings or 4-squares puzzle has 33 examples |
|||
9 billion names of God the integer has 42 examples |
|||
99 Bottles of Beer has 291 examples |
|||
A+B has 224 examples |
|||
ABC Problem has 104 examples |
|||
Abstract type has 77 examples |
|||
Abundant, deficient and perfect number classifications has 69 examples |
|||
Accumulator factory has 97 examples |
|||
Ackermann function has 194 examples |
|||
Active Directory/Connect has 24 examples |
|||
Active Directory/Search for a user has 16 examples |
|||
Active object has 37 examples |
|||
Add a variable to a class instance at runtime has 51 examples |
|||
Address of a variable has 69 examples |
|||
AKS test for primes has 55 examples |
|||
Align columns has 97 examples |
|||
Aliquot sequence classifications has 32 examples |
|||
Almost prime has 58 examples |
|||
Amb has 35 examples |
|||
Amicable pairs has 69 examples |
|||
Anagrams has 99 examples |
|||
Anagrams/Deranged anagrams has 63 examples |
|||
Angle difference between two bearings has 24 examples |
|||
Animate a pendulum has 55 examples |
|||
Animation has 61 examples |
|||
Anonymous recursion has 86 examples |
|||
Append a record to the end of a text file has 36 examples |
|||
Apply a callback to an array has 144 examples |
|||
Apply a digital filter (direct form II transposed) has 14 examples |
|||
Arbitrary-precision integers (included) has 84 examples |
|||
Archimedean spiral has 40 examples |
|||
Arena storage pool has 25 examples |
|||
Arithmetic evaluation has 51 examples |
|||
Arithmetic-geometric mean has 93 examples |
|||
Arithmetic-geometric mean/Calculate Pi has 23 examples |
|||
Arithmetic/Complex has 101 examples |
|||
Arithmetic/Integer has 176 examples |
|||
Arithmetic/Rational has 59 examples |
|||
Array concatenation has 159 examples |
|||
Array length has 124 examples |
|||
Arrays has 188 examples |
|||
Assertions has 96 examples |
|||
Associative array/Creation has 128 examples |
|||
Associative array/Iteration has 107 examples |
|||
Atomic updates has 38 examples |
|||
Average loop length has 34 examples |
|||
Averages/Arithmetic mean has 168 examples |
|||
Averages/Mean angle has 63 examples |
|||
Averages/Mean time of day has 50 examples |
|||
Averages/Median has 103 examples |
|||
Averages/Mode has 76 examples |
|||
Averages/Pythagorean means has 96 examples |
|||
Averages/Root mean square has 111 examples |
|||
Averages/Simple moving average has 78 examples |
|||
AVL tree has 18 examples |
|||
Babbage problem has 80 examples |
|||
Balanced brackets has 112 examples |
|||
Balanced ternary has 34 examples |
|||
Barnsley fern has 39 examples |
|||
Benford's law has 58 examples |
|||
Bernoulli numbers has 43 examples |
|||
... |
|||
Variable size/Set has 37 examples |
|||
Variable-length quantity has 35 examples |
|||
Variables has 109 examples |
|||
Variadic function has 94 examples |
|||
Vector products has 77 examples |
|||
Verify distribution uniformity/Chi-squared test has 21 examples |
|||
Verify distribution uniformity/Naive has 40 examples |
|||
Video display modes has 13 examples |
|||
Vigenère cipher has 0 examples |
|||
Vigenère cipher/Cryptanalysis has 0 examples |
|||
Visualize a tree has 35 examples |
|||
Vogel's approximation method has 12 examples |
|||
Voronoi diagram has 32 examples |
|||
Walk a directory/Non-recursively has 84 examples |
|||
Walk a directory/Recursively has 75 examples |
|||
Water collected between towers has 28 examples |
|||
Web scraping has 75 examples |
|||
Window creation has 81 examples |
|||
Window creation/X11 has 23 examples |
|||
Window management has 19 examples |
|||
Wireworld has 47 examples |
|||
Word search has 9 examples |
|||
Word wrap has 63 examples |
|||
World Cup group stage has 14 examples |
|||
Write entire file has 53 examples |
|||
Write float arrays to a text file has 64 examples |
|||
Write language name in 3D ASCII has 59 examples |
|||
Write to Windows event log has 23 examples |
|||
Xiaolin Wu's line algorithm has 25 examples |
|||
XML/DOM serialization has 45 examples |
|||
XML/Input has 68 examples |
|||
XML/Output has 55 examples |
|||
XML/XPath has 52 examples |
|||
Y combinator has 81 examples |
|||
Yahoo! search interface has 19 examples |
|||
Yin and yang has 53 examples |
|||
Zebra puzzle has 39 examples |
|||
Zeckendorf arithmetic has 10 examples |
|||
Zeckendorf number representation has 57 examples |
|||
Zero to the zero power has 94 examples |
|||
Zhang-Suen thinning algorithm has 26 examples |
|||
Zig-zag matrix has 92 examples |
|||
</pre> |
|||
=={{header|Mathematica}}== |
=={{header|Mathematica}}== |