表計算一筆書き・・・無限（インフィニティ） 【解答】

問題はこちらを参照。

【´･ω･`】:今回は本当に手も足もでなかった・・・

(●`ε´●):「今回」はぁ？！「いつも」の間違いだろ！！

*************************************************************************

エクセルの解答です。
=MID(" ∞",1+((6-ROW())^2+(2.5-ABS(6-COLUMN()))^2*5)/18,1)
の５７文字です。

解答にあたって
今回の問題は、やっぱり２つの○です。
○にするには、RCの二乗和が一番手っ取り早い。
ただし、今回は円（正確には楕円）の中心が２つある。
そこで、そこで列側の中心点を
「2.5-ABS(6-COLUMN())」
で取ることに。
後は、微調整で最初に作ったのが６０文字で
=LEFT("∞",INT(((6-ROW())^2+(2.5-ABS(6-COLUMN()))^2*5)/18)=1)
さらに微調整で最終的に５７で終わりました。
たぶん、y sakudaさんなどとほぼ同じようなやり方と思います
。
これが、一般的と思っています・・・。
果たしてほかの人はどんな考え方なのか興味津々
（長い数式も期待してます。）

ほかに頭に浮かんだのは、
正弦曲線（sine curve)
http://homepage2.nifty.com/sintakenoko/Applet/Sine1.html
の２重化です。
しかし、三角関数は、二十数年前の高校以来で全く覚えていな
い。
というか、その当時からよく分からなかった・・・。
それでも、無理矢理やったのが、次の式
=LEFT("∞",SIN(((6-ROW())^2+(2.5-ABS(6-COLUMN()))^2*4)*PI()/50)+0.1)
SINは使っているが、正弦曲線にはほど遠いし、
ただ単に文字数が長くなっただけ・・・。
三角関数で、悪児さんあたりが
黒魔術を出してくるのではないかと期待したのですが・・・。

その後、配列数式でもやってみましたが、
自分のは後で提示するか考えます。

そうそう・・・
三四郎の解答の方は、問題出題後に作ろうと思ったのですが・
・・
勉強する時間もなく、さぼりましたm(_ _)m

                                                                     (minmaxさん談)

*********************************************************************************************

★表計算一筆書き・・・既出問題と解答

Comments

[投稿情報: くまぷー]

まずはRCを使った89文字です。

=LEFT("*",OR(INT((ROW()-6)^4+(COLUMN()-IF(COLUMN()>6,8.5,3.5))^4)={39,40,55,86,261,625}))

次はジョー３さんに某所で「くまぷーさんに勝った」と言われ
発憤してジョー３さんの得意技Areas系の回答で６８文字(^o^)
これならばminmaxさんの解答を見た後でもカンニングにはならないだろう(^_^)v

=LEFT("∞",AREAS($K$11 (C1:D11,H1:I11,A4:K8,B2:E10,G2:J10,A1:K11))=2)

[投稿情報:]

>Areas系の回答で６８文字(^o^)
えーーーそんなに短くなるんかーーー

[投稿情報: くまぷー]

>えーーーそんなに短くなるんかーーー

でへへへ・・・(^^ゞ
最後に活を入れてくれたジョー３さんのお蔭です(^^ゞ

[投稿情報: minmax]

くまぷーさんのAreasやるもんだな～
Areasでもやりにくい図形と思ったのですが。

[投稿情報: minmax]

くまぷーさんの８９の式も苦労されてますね(^_^)

[投稿情報:]

>入れてくれたジョー３さんのお蔭です(^^ゞ
入れるんじゃなかった。・・・・

[投稿情報: くまぷー]

>くまぷーさんのAreasやるもんだな～

ははは、有り難うございます。

minmaxさんの・・・「2.5-ABS(6-COLUMN())」
・・・思いつきませんでした。
なんとか「御陵」の上半分を
利用できないかと考えたんですが
ダメでした。

その結果・・・
＞くまぷーさんの８９の式も苦労されてますね(^_^)

仰るとおり、苦労しました。
大家として棄権するわけにも行きませんので・・・(^^ゞ

[投稿情報: くまぷー]

＞入れるんじゃなかった。・・・・

でへへへへ(^^ゞ

[投稿情報: えくせるバカ]

配列物で48文字
A1に
=REPT("∞",{0;1;1;2;2;2;2;2;1;1}+{0,1,2,2,1}=2)
A1:E10を選択してCtrl+Shift+Enter
その状態でK列までフィルコピーしてから
11行までフィルコピー。

RC物65文字
=REPT("∞",ABS(MATCH(ROWS(1:$6),{1,4,6},1)-MOD(COLUMN(E1)^2,5))=1)
でした。

[投稿情報: minmax]

＞RC物65文字
えくせるばかさん
よくこんな式思いつきますねぇ。
この問題で
MatchとModの組み合わせ
私には、絶対に思いつかない。

そうだ、通りすがりの暇人さんも参加しませんか？

[投稿情報: ジョー3]

皆さん、短いですねーー
では、長いの長いの・・・・
=LEFT("∞",OR((MOD(COLUMN()+3,5)-1.5)^2*4+(ROW()-6)^2={18,25,26,29}))

あれーーー、、あれーーー
見間違いだった。近眼がーーー・・・・
６８だったーーー

で、無理矢理、、円をつぶしました。
朝、布団の中で思いついたのを、
形にしました。
＆
推敲がなかったです。。

[投稿情報: minmax]

よくみたら、えくせるばかさんの式は、
配列の式をうまくRCの式に置き換えているもののような気がします。
私には、思いつかない事にかわりありませんが。
ちなみに、配列のみでやってみたものは、やり方文字数一緒でした。
配列とRを使ったものはkirさんの式をみてから提示しようかなと思っています。
大差は無いと思いますが。

[投稿情報: y sakuda]

出かけていて出遅れました。
他の方のはまだ見ておりませんが、とりあえず、私のを出します。
Excel57と字数はminmaxさんと同じですが、
少々違うようですね。

=LEFT("*",MOD(ABS(COLUMNS(A:$F)*9-31)+(ROW()-6)^2,31)＞21)

これじゃ発想が分かりにくいので、元になったExcel58も載せておきます。

=LEFT("*",MOD(ABS(COLUMNS(A:$F)-3.5)*9+(ROW()-6)^2,31)＞22)

要するに、2×2ではなく、4×2に分割して描画してます。

さあ、これから皆さんの解析するぞーー^^

[投稿情報: えくせるバカ]

>配列の式をうまくRCの式に置き換えているもののような気がします。
その通りです。
プラスとマイナスの違いだけで、
考え方は同じです。

[投稿情報: y sakuda]

えくせるバカさんのはAreas系ではなく、配列数式だったか^^；
ジョー3のはもう少し試行錯誤すれば、不等号で済ませられるとこ見つけられたと思います。

私はSINではなく、COSで試しましたがやはり60台になるのでやめちゃいました。

[投稿情報: minmax]

y sakudaさんの式でC部分を私の解答に移植すると
=MID(" ∞",1+((6-ROW())^2+(COLUMNS(A:$F)-3.5)^2*5)/18,1)
で５５になりますね。
気づきませんでした。

[投稿情報: ジョー3]

＞ジョー3のはもう少し試行錯誤すれば、不等号で済ませられるとこ見つけられたと思います。

そ、そ、そんな気がする・・・・

[投稿情報: y sakuda]

>で５５になりますね。
本当だ^^;

[投稿情報: かず]

も～っ、さっぱり付いて行けません。

=LEFT("∞",--OR(--(COLUMNS(A:$F)&ROWS(1:$6))={11,12,13,24,25,36,46,54,55,61,62,63}))
83文字です。

[投稿情報: くまぷー]

＞も～っ、さっぱり付いて行けません。×２

みなさん、ホントによくいろいろ考えつくな～
白旗パタパタ(_ _。)/~~

[投稿情報:]

＞も～っ、さっぱり付いて行けません。
あーーーかずさんと似てて、嬉しいです。
＆私も、ついていけなくなってきたし・・・・

[投稿情報: minmax]

かずさんの
＆でつなぐの
わかりやすくて良いと思います。
本来は、この方が応用が利くのかもですね・・・

[投稿情報: 悪児]

今、帰ってきました。
今日は、ずっとネットに接続できなくて、

三四郎53と
Excel56を作ったのですが、
宣言ができませんでした。(^^;)(^^;)

期限遅れですが、
一応紹介しておきます。(^^)ゞ

三四郎53
=Mid(" *",SumSq(6-Row(A1),5-Col(E1) MOD 5*2)/12+1,1)

Excel56
=MID(" **",SUMSQ(6-ROW(),5-MOD(COLUMN(E1),5)*2)/6+1,1)

こちらは、期限内のExcel60
=MID(" **",((6-ROW())^2+MIN(({7,17}-COLUMN()*2)^2))/6+1,1)

[投稿情報: y sakuda]

さすが悪児さん＾＾；

[投稿情報: minmax]

悪児さんお疲れ様です。
"　*"
はスペース３つですね。
ちょこっとやってすぐに５６とは、さすがですね。

[投稿情報: minmax]

あ、三四郎はスペース２つでしたね。

[投稿情報: くまぷー]

悪児さん、お早うございます。
これから、1日体育館なので
帰ってきてから拝見させて頂きますね(^o^)

[投稿情報: kir]

おはようございます。ご想像どおり配列ものでした。

A1～E11を選択して
=LEFT("*",{2,1,0,0,1}+{2;1;1;0;0;0;0;0;1;1;2}=2)
Ctrl+Shift+Enterで確定し、{}がついて50文字。
K列までドラッグで完成

A1～E1を選択して
=LEFT("*",{2,1,0,0,1}+INT(1.24^ROWS(1:$6))=3)
Ctrl+Shift+Enterで確定し、{}がついて47文字
11行までドラッグし、K列までドラッグで完成

[投稿情報: minmax]

kirさんこんにちは
お待ちしておりました。
配列数式をつかったもの一筆書きでは初めてやってみました。
RCなしのは想像どおりでした。
ちなみにRをつかったものは４７文字宣言でしたので
LENをつかって
{=LEFT("∞",{2,1,0,0,1}+LEN(3^ABS(6-ROW()))=3)}
で４６文字で頑張ってみました。

[投稿情報: y sakuda]

どうも、配列数式のは拝見して試してみると、「なるほど」と思うのですが、自分じゃ上手く作れない^^;

[投稿情報: きっちー]

三四郎　５５

=If(SumSq(Cols(A1:$F6)*2-7,Row(A1)-6,3,1) DIV 14=2,"∞")

三四郎　５２

=If((SumSq(Cols(A1:$F6)*2-7,Row(A1)-6)-25)^2<50,"∞")

とりあえず出来たと言うところで、最後の詰めを行っていません。

Sumsq の ,3,1 の所、わかるかな。(^^)

[投稿情報: y sakuda]

きっちーさんのExcelに書き換えてみた所
=IF((SUMSQ(COLUMNS(A1:$F6)*2-7,ROW(A1)-6)-25)^2＜50,"∞","")

58文字

=IF(INT(SUMSQ(COLUMNS(A1:$F6)*2-7,ROW(A1)-6,3,1) / 14)=2,"∞","")

64文字
になりました。

>Sumsq の ,3,1 の所、わかるかな。(^^)
私なら、多分+10にして、それ以上考えてないとオモフ・・・・

[投稿情報: くまぷー]

悪児さん・・・

＞ちょこっとやってすぐに５６とは、さすがですね。×２

midは難しい・・・ぜんぜん、使えません(＞_＜)

[投稿情報: くまぷー]

Kirさんもそうだけど、minmaxさんも
よく配列数式が思いつくな～

sakudaさんと同様に
＞どうも、配列数式のは拝見して試してみると、「なるほど」と思うのですが、自分じゃ上手く作れない^^;

[投稿情報: くまぷー]

＞>Sumsq の ,3,1 の所、わかるかな。(^^)
＞私なら、多分+10にして、それ以上考えてないとオモフ・・・・

確かに結果的には同じなんだろうけど
ここに１０を加えるという発想がすごい・・・

[投稿情報: minmax]

>確かに結果的には同じなんだろうけど
結果は同じでも文字数を追求すると１文字違うかも。
１０を足す発想とSumSqの中に入れる発想は確かにすごい。

配列数式は十分に理解はしてませんが、
一筆書き参加者の皆さんのおかげで何となくですがわかるようになってきました・・・

[投稿情報: くまぷー]

わかりにくくてスミマセン(^^ゞ

言いたかったのは・・・

１０増やせばいいといことを
発見したきっちーさんが
がスゴイということです。

[投稿情報: minmax]

＞１０増やせばいいといことを
＞発見したきっちーさんが
＞がスゴイということです。
そうだろうと思っていましたが
見ているだけの方のためにも補足してしまいました(^_^;)

[投稿情報: 悪児]

作るだけは作ったけど、
皆さんの作品を鑑賞する時間が・・・(^^;)(^^;)

[投稿情報:]

＞皆さんの作品を鑑賞する時間が・・・(^^;)(^^;)

いつものおれみたいだ、、、・・・
逃げますーーーー

[投稿情報: ｋ＠自転]

う～～～
また参加できなかった～～orz

それにしても、、、、凄すぎじゃ～～＾＾；

[投稿情報: kir]

悪児さんのおかげで短縮成功！43文字
{=MID("　　*",{2,1,0,0,1}+1.24^ROWS(1:$6),1)}

[投稿情報: えくせるバカ]

kirさんの４３文字ですが
配列式でRowsは難しそうに思うんですが
どうすれば上手く出来るのかなぁ～？

[投稿情報:]

>悪児さんのおかげで短縮成功！43文字
うおーーー・・・・これは、これは、、
>それにしても、、、、凄すぎじゃ～～＾＾；
そういうことだなーーー
>配列式でRowsは難しそうに思うんですが
やはり、、研究の価値ありってことだよなーーー・・・・
おらさっぱりだ、、、

[投稿情報: えくせるバカ]

kirさんの４３文字
A1:E1を選択してCtrl+Shift+Enter
で、できましたm(__)m

[投稿情報: くまぷー]

ｋ＠自転さん、いらっしゃいませ(^o^)

＞それにしても、、、、凄すぎじゃ～～＾＾；

おいらもそう思います。
一応は参加しているけれど
提示された式を見てもついていけない・・・

＞また参加できなかった～～orz

次回はよろぴく～(^.^/~~~

[投稿情報: くまぷー]

＞おらさっぱりだ、、、

おいらも・・・(^^ゞ

[投稿情報: y sakuda]

>また参加できなかった～～orz
>それにしても、、、、凄すぎじゃ～～＾＾；

そんなこと言わないで参加してくださいませ。
参加することに意義がある・・・・かな？

[投稿情報: minmax]

>悪児さんのおかげで短縮成功！43文字
出題者として４３以下にならないかちょっと頑張ってみましたが、それ以下は見あたらず・・・
参りました～。

[投稿情報: kir]

えくせるバカ さん
>A1:E1を選択してCtrl+Shift+Enter
すいません。つい省略してしまい、
お手数お掛けしました。

>一筆書き出題者ローテ
お返事するのを忘れてました。ｍ（＿＿）ｍ
まだ何も案がありませんが参加させてください。

>また参加できなかった～～orz
いっそｋ＠自転さんもお題を考えて見られては如何でしょうか？

[投稿情報: くまぷー]

kirさん、ありがとうございます。(^O^)
ローテの話題はこちらで続けましょう。m(__)m

http://kumapooh.justblog.jp/blog/2008/01/post-81ef.html