>>479
% Prolog

対象テーブルの日毎のレコード数ただしグラフ化したいのでゼロの日はゼロと出力したい(_日毎のレコード数) :-
　　　　min((テーブルデータ(_CREATED),split(_CREATED,[' '],[_日付,_])),_起点日付),
　　　　max((テーブルデータ(_CREATED),split(_CREATED,[' '],[_日付,_])),_終点日付),
　　　　対象テーブルの日毎のレコード数ただしグラフ化したいのでゼロの日はゼロと出力したい(_起点日付,_終点日付
,_日毎のレコード数).

対象テーブルの日毎のレコード数ただしグラフ化したいのでゼロの日はゼロと出力したい(_日付,_終点日付,_日付,_日毎
のレコード数) :-
　　　　_日付 @=< _終点日付,
　　　　count(テーブルデータ(_CREATED),split(_CREATED,[' '],[_日付,_]),_日毎のレコード数),
対象テーブルの日毎のレコード数ただしグラフ化したいのでゼロの日はゼロと出力したい(_日付1,_終点日付,_日付,_日
毎のレコード数) :-
　　　　_日付1 @=< _終点日付,
　　　　前日・今日(_日付1,_日付2),
　　　　対象テーブルの日毎のレコード数ただしグラフ化したいのでゼロの日はゼロと出力したい(_日付2,_終点日付,_
日付,_日毎のレコード数).

翌日は(_当日,_翌日) :-
　　　　atom_to_term(_当日,_当日項),
　　　　前日・今日(_当日項,_年/_月/_日),
　　　　concat_atom([_年,'/',_月,'/',_日],_翌日).

% 前日・翌日/2は http://nojiriko.asia/prolog/nan_nichi_mae_go.html を参照してください。