出題いきさつから、、、、、
まずは、
12345限定で、2個交換(52341、21345,32145・・・・8種)
次回があれば、ABCDEとか、あいうえお、とか、
ばらばらの数値等 76294とか、、、発展したいと思っておりました。
ところが、みなさん、、、スゴイ・・・・最初から、、わたしの2,3回分の
出題希望パターンを探ったりして頂いたようで、、、、スゴイ!!
あと、お隣交換の簡易パターンと誤解させるデータ・・・・だったり、、、
でも、、、その分かえって面白かった。
で、
>12345限定で、2個交換(51234、21345,32145・・・・8種)
における、、、
出題時の仮の回答
130文字です
=IF(MID(A2,1,1)*1<>1,1,"")&IF(MID(A2,2,1)*1<>2,2,"")&IF(MID(A2,3,1)*1<>3,3,"")&IF(MID(A2,4,1)*1<>4,4,"")&IF(MID(A2,5,1)*1<>5,5,"")
その後、弄ったのはなくなりました。
皆さんの文字数を見た後のがんばり具合は、、
そして、簡易お隣交換版は、、、、
回答者ジョー3が、・・・ってことで、、、
(ジョー3さん談)
>12345限定で、2個交換(52341、21345,32145・・・・8種)
ごめんごめん、、、10種だったよねーーー
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時01分
で、
びっくりは、、、
No1
からくちさんの、、、、36宣言
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時04分
さらに、、びっくり
No2は、、、
minmax さんの、、、21宣言、、、
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時05分
もう、、かくしだましかない・・・・・
・・・・・・・
でも、、、まだ、,やってなかった。
でも、、、
うまくいった。。。
39文字
=56-LEN((E3-E2)/9)*11+LEFT((E3-E2)/9)-1
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時12分
で、すぐ、、、
37
=55-LEN((E3-E2)/9)*11+LEFT((E3-E2)/9)
えーーい、、、、
まさか、、、、
33
=56-LEN((E3-E2)/9)*11+LEFT(E3-E2)
これは、、、勘だけだった。
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時14分
あ、、、
4種限定の、、17は
=65-LEN(A2-A1)*11
で、いいよね、、、・・・・
・・・・・
ちょっと混乱、、、、
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時22分
て、わけで、、、わたしのは、、、こんな・・・・
あんばいでした、、、
さて、さて、、、
皆さんは??
どーぞーーー・・・・
・・・・・
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時24分
17=56-LEN(A2-A1)*11
でもいいけどね。
隣の数値の入れ替え限定で最初にやったのは
21=FIND(9,A2-2345)*11-1
でした。
投稿情報: min | 2010年12 月25日 (土曜日) 午後 08時25分
>21=FIND(9,A2-2345)*11-1
こりゃまた、、こってるねーーー
。。。。。
おもいつかんです。。。
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時30分
関数1個、85文字です。
'=HLOOKUP(A2%,{1,124,125,132,143,153,213,321,423,523;45,43,35,23,24,25,12,13,14,15},2)
ま、単純です。
投稿情報: くまぷー | 2010年12 月25日 (土曜日) 午後 08時36分
ジョーさんの大したもんだなあ。。
思いつきませんですね。
もうちょっと見てみます。
投稿情報: min | 2010年12 月25日 (土曜日) 午後 08時38分
>=HLOOKUP(A2%,{1,124,125,132,143,153,213,321,423,523;45,43,35,23,24,25,12,13,14,15},2)
うひゃ、ひゃー・・・・
なんだこりゃ、、、
思いつかなかった。
すげーーー・・・・・
・・・・・・
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時39分
あ、、、ごめんごめん、、、、
ていせいですーーーー
貼り付ける式を間違えました。
・・・・・・・
あちこちテストしたもので、、、、
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時43分
E3、E2は、、、、
A2、A1の、、、、、だいぶずれてました、,,
実は、,,,
次回問題の番地でテストした、、、もので、、、、
すまんこってす。。。。
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時45分
考える時間がとれないのでこれでご勘弁。
=5-INT(((A2-A1)*10)^0.124)&INT(((A2-A1)*2)^0.206)+INT(5.5-((INT(((A2-A1)*10)^0.124)))^1.65)
無駄がはいったままです・・・
投稿情報: きっちー | 2010年12 月25日 (土曜日) 午後 08時46分
12345の
2カ所を取り替える(ランダムに)
式をE列に・・・・・作って、
今回の式をテストしたもので、、、、
・・・・・
平身低頭。。。。ご免なさい・・・。。
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時47分
>=5-INT(((A2-A1)*10)^0.124)&INT(((A2-A1)*2)^0.206)+INT(5.5-((INT(((A2-A1)*10)^0.124)))^1.65)
これも、,呑んだあたまにきつい少数、、、
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 08時56分
35=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
あっていますかあ。
36はFINDの代わりにMIDじゃないかなあ。
投稿情報: min | 2010年12 月25日 (土曜日) 午後 09時03分
>・厄介な考え方だけど短い
=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
>・単純な考え方だけど長い
=LEFT(IF(LEFT(A2)*1=3,13,SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
SUBSTITUTE(12543,MID(A2*2-A1,1,1),),MID(A2*2-A1,2,1),),
MID(A2*2-A1,3,1),),MID(A2*2-A1,4,1),),MID(A2*2-A1,5,1),)),2)
>・この問題に相応しい?90文字
=LOOKUP(A2,A1+{1,10,22,100,220,333,1000,2200,3330,4444}*9,{45,34,35,23,24,25,12,13,14,15})
>・ある意味、関数を考える上での基本?的な考え方
=FIND(9,RIGHT(111&A2-A1,4))&2+COUNT(0/RIGHT(A2-A1,{1,2,3}))
投稿情報: からくち | 2010年12 月25日 (土曜日) 午後 09時08分
45=5-INT(LOG(A2-A1))&FIND(5-INT(LOG(A2-A1)),A2)
左詰になってしまうけど、ご勘弁を
投稿情報: ni | 2010年12 月25日 (土曜日) 午後 09時09分
=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
いいみたいですけどーーーー・・・・
不思議だけどーーーー
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 09時11分
>45=5-INT(LOG(A2-A1))&FIND(5-INT(LOG(A2-A1)),A2)
log????・・・・・・
ですかーーーーー????
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 09時13分
最初に考えたの(A1固定)がこれ
68=MID(A2,LEN(A2)-INT(LOG(A2-A1)),1)&MID(A1,LEN(A2)-INT(LOG(A2-A1)),1)
LENでよかったのか~
投稿情報: ni | 2010年12 月25日 (土曜日) 午後 09時17分
>=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
>=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
ん、、、同じなんですねーーー
SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
SUBSTITUTE・・・・・
やろうと思って、,,忘れてましたーーーー
>・この問題に相応しい?90文字
・・・むむむ・・・・、むじかしい、、、=要研究・・・・
> =FIND(9,RIGHT(111&A2-A1,4))&2+COUNT(0/RIGHT(A2-A1,{1,2,3}))
0/がまだ、、、、納得できてない初心者だじょーーー
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 09時19分
>LENでよかったのか~
logなんて、高度なのは、,,,しらーーん、、、、
投稿情報: ジョー3 | 2010年12 月25日 (土曜日) 午後 09時25分
おそくなりました。
固定は全然だめでした。回答見ても意味が分からないですw
A1可変の76(ABCDEでもなんでもOK)
{=SUM(SMALL((FIND(MID(A1,ROW(1:5),1),A2)<>ROW(1:5))*ROW(1:5),{4,5})*{10,1})}
ま、固定の短いのは後でゆっくり拝見します。
投稿情報: y sakuda | 2010年12 月25日 (土曜日) 午後 11時20分
可変では84と長いですが、こんなのも
{=SUM(SMALL((MMULT({1,-1},-MID(A1:A2,COLUMN(A:E),1))<>0)*COLUMN(A:E),{4,5})*{10,1})}
投稿情報: y sakuda | 2010年12 月25日 (土曜日) 午後 11時22分
>不思議だけどーーーー
では、こうすると分かりやすい、、、かも
=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
⇓
=6-LEN(A2-A1)&MID(A2,6-LEN(A2-A1),1)
⇓
=6-LEN(A2-A1)&LEFT(RIGHT(A2,LEN(A2-A1)))
⇓
=MID(54321,LEN(A2-A1),1)&LEFT(RIGHT(A2,LEN(A2-A1)))
投稿情報: からくち | 2010年12 月26日 (日曜日) 午前 07時55分
ただいまーーー・・・・帰宅、、
さてさて、,皆さんのを、、、
ゆっくり見てみようかなーーー
> 21
> =FIND(9,A2-2345)*11-1
なるほどーーー・・・今仕組みが分かった。
>=HLOOKUP(A2%,{1,124,125,132,143,153,213,321,423,523;45,43,35,23,24,25,12,13,14,15},2)
上手に並べたんですねーー %で文字数節約なのね、
>=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
>=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
おふたりとも、、、すごい、、、
>=LOOKUP(A2,A1+{1,10,22,100,220,333,1000,2200,3330,4444}*9,{45,34,35,23,24,25,12,13,14,15})
私の倉庫に似たのが・・・・でも、、、工夫がなくて長かった。
*9 がなかったので、、、 だいぶ長かった。
投稿情報: ジョー3 | 2010年12 月26日 (日曜日) 午後 12時07分
> 45
> =5-INT(LOG(A2-A1))&FIND(5-INT(LOG(A2-A1)),A2)
よく見たら、・・・・
まえの =6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2) に、
にてるーー、、てか、そっくり、、、すごいなーーー皆さん、、
> {=SUM(SMALL((FIND(MID(A1,ROW(1:5),1),A2)<>ROW(1:5))*ROW(1:5),{4,5})*{10,1})}
すごいですーーー、、、技も、関数も、,たくさんですねーーー
わたしは・・・・短くまとめられなかったです。
> {=SUM(SMALL((MMULT({1,-1},-MID(A1:A2,COLUMN(A:E),1))<>0)*COLUMN(A:E),{4,5})*{10,1})}
MMULT・・・・・あはは、、、忘れてるシーーーー・・・恥ずかし。。。
投稿情報: ジョー3 | 2010年12 月26日 (日曜日) 午後 12時17分
sakudaさん、、すごいですーーー
76を
テストしてみましたーーー
ABCDE
あいうえお
ほんとは、、、
あとで、これに近いのを、出そうかな・・・成り行き次第で、、、だった。。。
先読み、、、??ありがとうございます!!って、、感じ、、、
でも、、、違うのも、,,もう一個準備中です。
投稿情報: ジョー3 | 2010年12 月26日 (日曜日) 午後 12時28分
>では、こうすると分かりやすい、、、かも
>⇓
>=MID(54321,LEN(A2-A1),1)&LEFT(RIGHT(A2,LEN(A2-A1)))
うんうん・・・・&むむーーーー
なんか、、、
自分の問題で、自分が疲れたみたいです。
自分の・・・・
33も、、、
考えてるうちに、、、変な気分になるくらいです。
・・・・・・・・
投稿情報: ジョー3 | 2010年12 月26日 (日曜日) 午後 01時58分
今回は完全にドツボに嵌って身動きできなくなりましたw
次回は頑張る^^
投稿情報: y sakuda | 2010年12 月26日 (日曜日) 午後 02時44分
>今回は完全にドツボに嵌って身動きできなくなりましたw
>次回は頑張る^^
76が、十分凄かったと思います。
正統派の、、立派な作品では?
投稿情報: ジョー3 | 2010年12 月26日 (日曜日) 午後 05時11分
私は、
35=6-LEN(A2-A1)&FIND(6-LEN(A2-A1),A2)
の前は、
43=6-LEN((A2-A1)*2)&FIND(6-LEN((A2-A1)*2),A2)
だった。
このような考え方は数人が気がついていると思いますが、
ジョー3さんの
33=56-LEN((a2-a1)/9)*11+LEFT(a2-a1)
のように「/9」(*2だったら気がつくと思うが)とかLEFTとかはなかなか気づかない。
気づいても形に出来ないのではないかと思います。
さすが、、エクセルに対する思いが違う。。
ちなみに、「/9」の代わりに「*2」を使っても33にしかならなかった。。
投稿情報: min | 2010年12 月26日 (日曜日) 午後 08時35分
余談:=RIGHT(A2/24)
投稿情報: からくち | 2010年12 月26日 (日曜日) 午後 09時59分
小手先で縮めてみた。。
32=8-LEN((A2-A1)/9)*11+CODE(A2-A1)
投稿情報: min | 2010年12 月26日 (日曜日) 午後 11時28分
>LEFTとかはなかなか気づかない。
というより、、、やり始めたことに向かっただけで、,,
逆に、FINDを考えなかった。
> =RIGHT(A2/24)
む・・・・
=hour(a2/24) なら、、、
・・・・・すぐ捨てたが、,,,,
> 32=8-LEN((A2-A1)/9)*11+CODE(A2-A1)
だはは、、、あるもんだね、、、、
投稿情報: ジョー3 | 2010年12 月27日 (月曜日) 午前 08時46分