我这会儿能想到的是:
第一个:
list = {3, -5, 7, -9, -4, 8};
min3 = Replace[list, Except[Alternatives @@ Part[list, Ordering[Abs@list, 3]]] -> 0, 1]
rest = list - min3
第二个:
Replace[{a, b, c}, a_ -> Sequence[a, a], 1]
第三个:
lst1 = {1, 3, 5, 7, 9, 11};
lst2 = {2, 4, 6, 8};
mid = PadRight[lst2, Length@lst1];
DeleteCases[Riffle[lst1, mid], 0]
用的指令比较多,注意看帮助.
Wolfram Mathematica 关于数表分拆问题求教?
Wolfram Mathematica 关于数表分拆问题求教?
一、Wolfram Mathematica 如何把数表按绝对值大小分组?
例如:把绝对值最小的3个数分为一组,把剩下的分为一组,要求保留每个数原来的位置不变,空位用0填充:
输入:{3,-5,7,-9,-4,8}
输出:
{3,-5,0,0,4,0}
{0,0,7,-9,0,8}
二、Wolfram Mathematica 如何把数组中每个元素原地重复n次?
例如:把{a,b,c}每个元素原地重复2次就得到:{a,a,b,b,c,c}
三、Wolfram Mathematica 如何把2个表交叉合并为一个表?
例如:把{1,3,5,7,9,11}与{2,4,6,8}交叉合并就得到
{1,2,3,4,5,6,7,8,9,11}
一、Wolfram Mathematica 如何把数表按绝对值大小分组?
例如:把绝对值最小的3个数分为一组,把剩下的分为一组,要求保留每个数原来的位置不变,空位用0填充:
输入:{3,-5,7,-9,-4,8}
输出:
{3,-5,0,0,4,0}
{0,0,7,-9,0,8}
二、Wolfram Mathematica 如何把数组中每个元素原地重复n次?
例如:把{a,b,c}每个元素原地重复2次就得到:{a,a,b,b,c,c}
三、Wolfram Mathematica 如何把2个表交叉合并为一个表?
例如:把{1,3,5,7,9,11}与{2,4,6,8}交叉合并就得到
{1,2,3,4,5,6,7,8,9,11}
数学人气:807 ℃时间:2020-02-05 21:52:05
优质解答
我来回答
类似推荐
猜你喜欢
- 1打靶时,靶子到打靶人之间的距离是340m,从子弹离开枪口后经过1.5s打靶人听到子弹击中靶的声音,若空气阻力不计,求子弹离开枪口时的速度.
- 2把一吨15度的水加热到50度分别要多少天气和电
- 3碱类物质一定能使酚酞试液变红对吗
- 4小强的练习册上有一道方程题,其中一个数字被墨水污染了,成了3/1(-x-1/2+x)=1-x-/5(表示被污染的数字)他翻了书后的答案,知道这个方程的解为x=5,于是他把被污染的数字求了出来,你能把小强计算过程写出来吗?
- 5爪子像竹叶和梅花的动物
- 6《月光曲》中贝多芬为盲姑娘弹的第一首曲是什么
- 7一分钟初一英语短篇小故事 周五就要了
- 8same time 前面用什么介词?
- 9已知方程(2m-1)x的4x-7次方-5=0,是关于x的一元一次方程,则m?,
- 10用100m长的铁丝,一面靠墙围成一个矩形鸡网,则当矩形面积最大时,该养鸡场的长比宽长多少米?