PUZZLEUP 2015

uc_jmh

newkid 发表于 2015-12-18 22:20
为什么X4? 3个子就能赢。你不会自己比划一下吗？
放在(1,2)是不是能赢还没验证，但肯定不是3步能赢。

恩 是X3 我做错了。

〇〇

我用了你的思路模拟了一个translate,
SQL> select translate('1628493','123456789','369258147') from dual;

TRANSLATE('162
--------------
3864279

In[18]:= {1, 6, 2, 8, 4, 9, 3}/. MapThread[Rule, {{1, 2, 3, 4, 5, 6, 7, 8, 9},{3, 6, 9, 2, 5, 8, 1, 4, 7}}]

Out[18]= {3, 8, 6, 4, 2, 7, 9}

结果第一题非常慢，m有什么好的办法做变换？
另外输出结果中有些数字字符串变成了表达式，怎么解决？
代码见楼下

〇〇

m.txt (3 KB, 下载次数: 15)

2015-12-19 19:55 上传

点击文件名下载附件

〇〇

lugionline 发表于 2015-12-18 21:29
忘了更新了，已经加上

m怎么做矩阵旋转,我只找到transpose，但那是行列互换

lugionline

我想可以先Transpose，然后行上的元素 reverse下就好了

m = Table[i*j, {i, 10}, {j, 10}]
m // MatrixForm
Reverse /@ Transpose[m] // MatrixForm

〇〇

lugionline 发表于 2015-12-23 18:36
我想可以先Transpose，然后行上的元素 reverse下就好了

m = Table

谢谢,我试试
563楼的代码为什么输出表达式?

lugionline

没看懂，但是我觉得是因为字符串没有转换成数字

In[6]:= 1 + "2"

Out[6]= 1 + "2"

〇〇

lugionline 发表于 2015-12-24 10:24
没看懂，但是我觉得是因为字符串没有转换成数字

In[6]:= 1 + "2"

你说得对
        d2=ReadList[StringToStream["987654321"], Character];
改为
       d2=IntegerDigits[987654321];
就好了,还快了点

〇〇

newkid 发表于 2015-8-5 21:50
#2 COLORED CUBES

You have red, blue and green unit cubes. You will create a 2x2x2 cube by using 8 o ...

真的与欧拉的题目一样

〇〇

newkid 发表于 2015-8-12 23:47
第二题SQL解法：

把大立方体的中心设置为(X,Y,Z)坐标系的原点。计算出每个小方块的坐标, 列举三种最基本的 ...

每个方块同色2,2结果是23，但欧拉计划599题中，每个方块不一定同色，总数是183