表計算一筆書き・・・手裏剣Ⅱ【解答例】

【´･ω･`】:いや～、参りました。とうとう４９文字の解法は

　　　　　　見つからずじまいでした。(^^ゞ

＊

Excel５５文字

=LEFT("★",MOD(STDEV(COLUMNS(A:$F)^2,ROWS(1:$6)^2),7)<1)

＊

三四郎５１文字

=If(Std(Cols(A1:$F6)^2,Rows(A1:F$6)^2) MOD 7<1,"★")

Comments

[投稿情報: kir]

こんばんわ。今回はこんな感じでした。
66：=LEFT("★",OR(SUMSQ(ROW()-6,COLUMN()-6)={0,2,8,17,18,32,34,41,50}))
61：=LEFT("★",OR(ABS(ROWS(1:$6)^2-COLUMNS(A:$F)^2)={0,11,20,21}))
61：=MID("★　　　　　★　　　★★",(ROWS(1:$6)^2-COLUMNS(A:$F)^2)^2^0.4+1,1)
50：=LEFT("★",RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)<"2")
50：=MID("★★",RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)+1,1)
49：=TEXT(RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)-2,";★")
49：=TEXT(1-RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2),"★;")

RIGHTに気付いて10文字以上短縮でした。

[投稿情報: む印]

それではまず
５４文字はこちらの方で
=MID("★",LEN(RIGHT(COLUMNS(A:$F)^2-ROWS(1:$6)^2)^4),1)

５０文字は
=MID("★★",RIGHT(COLUMNS(A:$F)^2-ROWS(1:$6)^2)+1,1)

４９文字は1の方で
=TEXT(1-RIGHT(COLUMNS(A:$F)^2-ROWS(1:$6)^2),"★;")

[投稿情報: ジョー3]

＞RIGHTに気付いて10文字以上短縮でした。
へーーー、、
そんな規則性が、、、へーーーー

[投稿情報: minmax]

ＰＣこけた〜
４９は予想どおり
携帯から

[投稿情報: む印]

kirさんとダブってましたので
５０の別物を
=LEFT("★",RIGHT(COLUMNS(A:$F)^2-ROWS(1:$6)^2)/2<1)

[投稿情報: ジョー3]

へーーー、なんで、みんなこんな規則性が、・・・見えるんだろうねー、、

[投稿情報: ジョー3]

４の中を見たけど、、駄目だった。

http://www.21style.jp/board/form13.cgi?action=res&resno=4064&id=jsp55

[投稿情報: minmax]

=LEFT("★",MOD(ABS(ROWS(1:$6)^2-COLUMNS(A:$F)^2),10)<2)
54
=LEFT("★",RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)<"2")
50

[投稿情報: minmax]

=If(Right(Rows(A1:A$6)^2-Cols(A1:$F1)^2,1)<2,"★")
49
=If(Rows(A1:A$6)^2-Cols(A1:$F1)^2 MATCH "[0-1]$","★")
53
=If(Rows(A1:A$6)^2-Cols(A1:$F1)^2 MATCH "[01]$","★")
52
以上３４６

[投稿情報: minmax]

あれ、私のエクセル５０はkirさんと同じか～
無駄な投稿だった～
あんまり変わらないけど・・・
=LEFT("★",--RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)<2)
50

[投稿情報: y sakuda]

今帰ってきました。
Textは考えなかったです。
皆さんの熟読していないので、かぶるかもしれませんが・・・・・
50の内二種
=LEFT("*",RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)＜"2")

=MID("**",RIGHT(ROWS(1:$6)^2-COLUMNS(A:$F)^2)+1,1)

じつは、最初、X^2+Y^2を使ってそこそこいっちゃったので、どう考えても当たり前の
X^2-Y^2に転向するまで時間がかかっちゃいました。
こちらの最短は63で
=MID("**　*　　　*",MOD(MIN(ROWS(1:$6)^2+COLUMNS(A:$F)^2,46),14),1)

長くなっちゃったのですが、変り種の68
=MID("*",LEN(LOG(MOD(MIN(ROWS(1:$6)^2+COLUMNS(A:$F)^2,46),14),2)),1)

[投稿情報: くまぷー]

うげぇー、Rightですか～
それにX^2-Y^2ですか～
ぜんぜん、見えんかった・・・
みなさん、流石です～

◇＼(o・Ｑ・o)／◇降参ですぅ・・・

[投稿情報: y sakuda]

私は結局努力の方向を間違えてた。
文字列を数字化して何とかならないかということで50は8種類もできたwww

[投稿情報: y sakuda]

くまぷーさんのSTDEV・・・・・
フツウこんなの考えないとオモフ・・・・

[投稿情報: くまぷー]

＞フツウこんなの考えないとオモフ・・・・

手裏剣シリーズですから～(^^ゞ

[投稿情報: y sakuda]

さては、くまぷーさんSTDEVいじって、きれいにできた図柄問題にしちゃったんんですねーー
他の方式が見えなくなってるwww

[投稿情報: minmax]

＞フツウこんなの考えないとオモフ・・・・
同感です(^^)

[投稿情報: ジョー3]

STDEV　？？

なんだっけ？？

[投稿情報: かず]

＞なんで、みんなこんな規則性が、・・・見えるんだろうねー、、

ホントに、皆さんどこがどう繋がって、閃くんでしょう！

[投稿情報: くまぷー]

＞他の方式が見えなくなってるwww

でへへへ　(‥ゞポリポリ

[投稿情報: かず]

＞STDEV　？？

「標本に基づいて標準偏差の推定値を計算します。」
だそうですよ。
う～ん、なんのことやら！

[投稿情報: かず]

あっ、間違ってました。

「引数を標本と見なし、標本に基づいて母集団の標準偏差の推定値を返します。」

ほうですね。

[投稿情報: ジョー3]

＞標本に基づいて・・・
んーーー学校ぽい。

＞う～ん、なんのことやら！
かずさんの、得意分野っぽい・・・・
気もするけど、、、

[投稿情報: ジョー3]

＞引数を標本と見なし、標本に基づいて母集団の
わーーー、あたまぐちゃぐちゃ・・・・

[投稿情報: y sakuda]

標準偏差ですから、大雑把に言って、ColumnとRowが離れると大きな数字になります。

私見ですが、問題をやるとき、これを使ってなんとかなるかと考える人はまずいないと思います。

[投稿情報: くまぷー]

＞私見ですが、問題をやるとき、これを使ってなんとかなるかと考える人はまずいないと思います。

ごめんなさい・・・
でも、あっという間にたたき伏せられました(T.T)

[投稿情報: minmax]

昨日は晩酌しすぎて急に眠くなり早めにねてしまいました。
おかげでこんな時間に目が覚めました。
で、ついでに昨日締め切り間際にちょっとやってみたもの投稿します。
=TEXT(1-RIGHT(ROWS(1:$6)^MOD(SECOND(NOW()*5),100)-COLUMNS(A:$F)^MOD(SECOND(NOW()*5),100)),"★;")
95
これはあんまり面白くないのですが、
*5の部分をちょっと変えてみたら結構面白かったので、
=TEXT(1-RIGHT(ROWS(1:$6)^MOD(SECOND(NOW()*9),100)-COLUMNS(A:$F)^MOD(SECOND(NOW()*5),100)),"★;")
ま、ご参考まで。

最後にy sakudaさんのlogを使った式は私には全く思いつかないですね。
対数ってのがなんだかきっぱり忘れています(^_^;)
いずれにしてもX^2-Y^2でなくX^2+Y^2でやってしまうなんて大したものですね。

[投稿情報: くまぷー]

minmaxさん、お早うございます。
いつもながら、研究熱心ですね。
個人的には上の式で描かれる模様の方が
好きです。(^O^)

さて、みなさん、次々回（９／３０）日は
minmaxさんから、お題を頂いたので
それを出題させて頂きます。
お楽しみにーーーー

出題のネタを送って頂ければ
順次出題させて頂きますので
他の方もよろしくお願いしますd(^-^)ネ!

[投稿情報: y sakuda]

minmaxさん、何でもうごかしちゃうな^^

>最後にy sakudaさんのlogを使った式は私には全く思いつかないですね

minと modの組合せ試してたら、たまたま拾う値が1,2,4,8になったものができました。
それで、２の対数で0,1,2,3に直したら上手く行くんじゃないかとやってみました。
結果として短縮にはつながらなかったのですが、ここではあまり使い道のなさそうなＬｏｇを使ってるので公開しました。
でも使いそうも無い代表格はＳＴＤＥＶですねーー

[投稿情報: くまぷー]

>でも使いそうも無い代表格はＳＴＤＥＶですねーー

STEDVで最短ならいいけど
そうじゃないからご愛敬・・・(^^ゞ

[投稿情報: y sakuda]

今週はくまぷーさんの作り置き分の出題で来週はminmaxさんですか～～

じゃ、少なくとも二週間は楽しめるんですね（orフラストレーション溜まる）

今週も月曜日出題ですか？

[投稿情報: くまぷー]

>今週も月曜日出題ですか？

はい、そうしましょう。
その方が秋分の日を使える方も
いらっしゃるでしょうから。

＞今週はくまぷーさんの作り置き分

これはぜんぜん、いい解法が浮かばなかった問題です。
Kさんのように、問題は出して解答は
皆さんにお任せという感じで行こうかと思っています(^^ゞ

[投稿情報: y sakuda]

>問題は出して解答は皆さんにお任せという感じで行こうかと思っています(^^ゞ

それでよろしいんではwww
別に出題者が最良解を出す義務はありませんでしょうし。
ただ、できない問題じゃ話になりませんけどね・・・・・たとえばできても700文字なんてのは根気が続かない^^;

[投稿情報: minmax]

＞来週はminmaxさんですか～～
私の問題はそんなに難しくなくつまらない問題と思いますが、みなさんがやると何文字になるのだろう？と思ってくまぷーさんに送ったものです。

ちなみに、私が今までの問題の中で一番気に入っている問題はくまぷーさんの将棋です。
完成図がとても一筆書きで書いたものとは思えないですからね～
そんな問題今後はないでしょうかね～

[投稿情報: くまぷー]

>たとえばできても700文字なんてのは根気が続かない^^;

そんな芸のないことは致しません（￣＾￣）

図にはしっかりとした規則性があります！

[投稿情報: くまぷー]

＞今までの問題の中で一番気に入っている問題はくまぷーさんの将棋です。

ありがとうございます。

＞そんな問題今後はないでしょうかね～

いや、ひとつ引き出しの中にあるんですが・・・
年末に年越し問題として出そうかと・・・
エクセル・コンテストとぶつかりますが・・・

[投稿情報: y sakuda]

＞今までの問題の中で一番気に入っている問題はくまぷーさんの将棋です。

将棋もこんなの一筆書きで？？ってな感じでしたが、カレンダーも「まさか？！」って感じでしたねーー

>そんな芸のないことは致しません（￣＾￣）

www
失礼^^

[投稿情報: minmax]

そうだ、カレンダーも結構良いですね(^^)