プログラミングのお題スレ Part22 (863ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞
ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡
45: 9 [sage] 2023/08/16(水)19:12:35.95 ID:y9YJABkH(1)
>>43 これだと、scriptを実行するたびに全てのjpegファイルをtemporaryディレクトリにdownloadするためサーバの負荷の面で行儀がよくないので、
ディレクリは TyphoonJpegDir512x512 または TyphoonJpegDir2048x2048 で固定とし、未取得のjpegがあればdownloadするように直すわ。
res='512x512' # default
OPT=`getopt -o hl -l highreso,lowreso -- "$@"`
eval set -- "$OPT"
while true; do
case "$1" in
-h | --highreso)
res='2048x2048'
shift ;;
-l | --lowreso)
res='512x512'
shift ;;
--)
shift
break ;;
esac
done
dir=./TyphoonJpegDir${res}
for d in $(seq -w 01 16); do
for h in $(seq -w 0 23); do
file="HMW92308${d}${h}.globe.1.jpg"
url="http://agora.ex.nii.ac.jp/digital-typhoon/globe/color/2023/${res}/${file}"
[ -f $dir/$file ] || { echo $url; curl -f -s -R -o "$dir/$file" $url; }
done
done
#set -x
time convert $(ls $dir/*.jpg) TyphoonAime${res}.gif
ls -o TyphoonAime${res}.gif
※見やすくするためインデントは全角スペースに置換してあります。
239(1): デフォルトの名無しさん [] 2024/02/15(木)22:00:50.95 ID:fu0tHwRa(1)
>>234
>>237は入力が1〜9のとき出力が正しくなかった。function内の1行目に if ($n -le 9) {return $n} を
挿入すると修正される。
Rでは添字の開始値は1で添字0では空のデータが返るので、入力が1〜9のときの場合分けは不要。
[]演算子と+演算子を文字列でも使えるように再定義した。
https://ideone.com/PP5swB
Dでは添字範囲指定は半開区間なので、入力が1〜9のときの場合分けは不要。
https://ideone.com/hvNBia
386(2): デフォルトの名無しさん [] 2024/08/03(土)21:36:58.95 ID:dM8NlTKR(1)
ごめん、画像から察してほしい
遊びだから曖昧なところは適当で
https://i.imgur.com/YUKpLcI.png
545: 9 [sage] 02/08(土)00:26:07.95 ID:vma3KbbM(2/2)
>>544 List::Utils → List::Util ね。ｽﾏｿ
568(1): デフォルトの名無しさん [sage] 02/11(火)17:48:30.95 ID:7RexIvi8(2/3)
>>561 lisp
https://ideone.com/g6m1EK
807: デフォルトの名無しさん [sage] 08/17(日)15:21:28.95 ID:OrBxx4uG(1)
ソートが消えて>>800と同じアルゴリズムになったね
840(1): 839 [sage] 09/10(水)23:35:38.95 ID:6JfM8ZLf(1)
>>485 scheme (chicken 4.13)
https://ideone.com/A6K3XL
・(cons y x)して最後にreverseする
・(list x y)して最後にflattenするのが >>839
上下前次1-新書関写板覧索設栞歴
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.029s