プログラミングのお題スレ Part22 (863ﾚｽ)
プログラミングのお題スレ Part22 http://mevius.5ch.net/test/read.cgi/tech/1691038333/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
ﾘﾛｰﾄﾞ規制
です｡10分ほどで解除するので､
他のﾌﾞﾗｳｻﾞ
へ避難してください｡
45: 9 [sage] 2023/08/16(水) 19:12:35.95 ID:y9YJABkH >>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 ※見やすくするためインデントは全角スペースに置換してあります。 http://mevius.5ch.net/test/read.cgi/tech/1691038333/45
239: デフォルトの名無しさん [] 2024/02/15(木) 22:00:50.95 ID:fu0tHwRa >>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 http://mevius.5ch.net/test/read.cgi/tech/1691038333/239
386: デフォルトの名無しさん [] 2024/08/03(土) 21:36:58.95 ID:dM8NlTKR ごめん、画像から察してほしい 遊びだから曖昧なところは適当で https://i.imgur.com/YUKpLcI.png http://mevius.5ch.net/test/read.cgi/tech/1691038333/386
545: 9 [sage] 2025/02/08(土) 00:26:07.95 ID:vma3KbbM >>544 List::Utils → List::Util ね。ｽﾏｿ http://mevius.5ch.net/test/read.cgi/tech/1691038333/545
568: デフォルトの名無しさん [sage] 2025/02/11(火) 17:48:30.95 ID:7RexIvi8 >>561 lisp https://ideone.com/g6m1EK http://mevius.5ch.net/test/read.cgi/tech/1691038333/568
807: デフォルトの名無しさん [sage] 2025/08/17(日) 15:21:28.95 ID:OrBxx4uG ソートが消えて>>800と同じアルゴリズムになったね http://mevius.5ch.net/test/read.cgi/tech/1691038333/807
840: 839 [sage] 2025/09/10(水) 23:35:38.95 ID:6JfM8ZLf >>485 scheme (chicken 4.13) https://ideone.com/A6K3XL ・(cons y x)して最後にreverseする ・(list x y)して最後にflattenするのが >>839 http://mevius.5ch.net/test/read.cgi/tech/1691038333/840
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.030s