Comments

グラフを描く(SQL) by inquisitor — last modified 2006-08-21 20:16

SELECT d,RPAD('',20*d/m,'*') n FROM dat,...

グラフを描く(Mathematica) by inquisitor — last modified 2006-08-21 18:51

<< Graphics`Graphics` BarChart@{2,...

グラフを描く(Mathematica) by inquisitor — last modified 2006-08-21 18:48

コンソールでやれば次のようになる In[1]:= この企画、Mathemat...

[プログラム][LL] io + OpenGL = ioDesktop でグラフを描く by SiroKuroPage — last modified 2006-08-21 16:06

例によって iolanguage にて。 ioDesktop では OpenGL を扱えるので、そっちで描画してみました。 graph.io GLGraphApp := OpenGL clone do( width := 440; height := 320 data := nil GW := 12 font := Font clone open("resources/library/fonts/Free/Sans/Bold.ttf&#

'*' でグラフを描くスクリプト @ Ruby by 32nd diary — last modified 2006-08-21 00:55

参考までにエントリで例示したグラフは以下のスクリプトで出力したものです．

#!/usr/bin/env ruby
columns = 20
nums = ARGV.collect {|s| s.to_i}
 
sum = nums.inject(0) do |sum, i|
sum = sum + i
end
 
max = nums.max
 
nums.each do |i|
puts '%3d/%3d : ' % [i, sum] +
'*' * (columns * (i.to_f/max) ).ceil
end
 
% ./graph.rb 4 6 4 9
4/ 23 : *********
6/ 23 : **************
4/ 23 : *********
9/ 23 : ********************

Re:会場周辺の地図、そしてプレス向けページ by ats — last modified 2006-08-21 00:42

>腹ぺこさん

飲酒は夜からのお楽しみ，ということでよろしくお願いします

Re:キミならどう書く 2.0 - ROUND 3 - by dancerj — last modified 2006-08-20 23:43

しまった、修正
/*BINFMTC:
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#define max(a,b) ((a) >= (b) ? (a) : (b))

int main(int ac, char** av)
{
int i, sum=0, maxval=0;
const char* graphstr="************************************************************************";
int graphstrlen=strlen(graphstr);
for (i=1; i<ac; (sum+=atoi(av[i])), (maxval=max(maxval,atoi(av[i]))), ++i) if (atoi(av[i])<0) exit(1);
for (i=1; i<ac; ++i)
printf("%.2i/%.2i %s\n", atoi(av[i]), sum, graphstr+graphstrlen-atoi(av[i])*graphstrlen/maxval);
return 0;
}

Re:キミならどう書く 2.0 - ROUND 3 - by dancerj — last modified 2006-08-20 23:36

Cで

/*BINFMTC:
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#define max(a,b) ((a) >= (b) ? (a) : (b))

int main(int ac, char** av)
{
int i, sum=0, maxval=0;
const char* graphstr="************************************************************************";
int graphstrlen=strlen(graphstr);
for (i=1; i<ac; (sum+=atoi(av[i])), ++i, maxval=max(maxval,atoi(av[i]))) if (atoi(av[i])<0) exit(1);
for (i=1; i<ac; ++i)
printf("%.2i/%.2i %s\n", atoi(av[i]), sum, graphstr+graphstrlen-1-atoi(av[i])*graphstrlen/sum);
return 0;
}