4.3.1 Top new questions this week

4.3.1.1 How to rotate the curve but not the axes?
4.3.1.2 Function to draw densely interconnected layers in graph (e.g., neural net)
4.3.1.3 An Intersection function on lists that saves intersection positions
4.3.1.4 Combining lists of lists with random structure
4.3.1.5 Slicing an Association with named key span without normalizing?
4.3.1.6 Finding Ramanujan's taxicab numbers
4.3.1.7 Area of surface of revolution
4.3.1.1 How to rotate the curve but not the axes?

http://mathematica.stackexchange.com/questions/135376/how-to-rotate-the-curve-but-not-the-axes

 
I have a such graphic: 
 
data = {{0, 5}, {1.9, 7.5}, {0, 12}, {-5, 15.5}, {-1.2, 33.4}}; 
p=Plot[Interpolation[Reverse /@ data, x, InterpolationOrder -> 2], {x, 
0, 55}, Epilog -> {Red,  ...
 

- asked by yode (11 votes), answered by kglr (11 votes)

4.3.1.2 Function to draw densely interconnected layers in graph (e.g., neural net)

http://mathematica.stackexchange.com/questions/135354/function-to-draw-densely-interconnected-layers-in-graph-e-g-neural-net

 
I can use Graph[] to manually draw the shape of a very simple set of interconnected layers (for instance, a small neural network): 
 
Graph[{1 -> 3, 2 -> 3, 1 -> 5, 2 -> 5, 1 -> 4, 2  ...
 

- asked by Larry OBrien (11 votes), answered by kglr (12 votes)

4.3.1.3 An Intersection function on lists that saves intersection positions

http://mathematica.stackexchange.com/questions/135583/an-intersection-function-on-lists-that-saves-intersection-positions

 
I would like an intersection function on lists like Intersection that also stores the coordinates of the intersections. For instance for {a,b,c} and {b,c,e} would give something like  ...
 

- asked by Kvothe (9 votes), answered by ciao (9 votes)

4.3.1.4 Combining lists of lists with random structure

http://mathematica.stackexchange.com/questions/135238/combining-lists-of-lists-with-random-structure

 
I have two lists which I would like to combine. One is of a random structure, which might be: 
 
l1={{3, 2, 4, 2}, {2, 3}, {4, 3}, {{2, 2}}, {{3, 3}}, {3, 2}} 
 
 
where the elements in each sublist may  ...
 

- asked by Jonathan Shock (9 votes), answered by Mr.Wizard (7 votes)

4.3.1.5 Slicing an Association with named key span without normalizing?

http://mathematica.stackexchange.com/questions/135092/slicing-an-association-with-named-key-span-without-normalizing

 
Is there way to slice an Association with named key span? 
 
Span currently doesn't accept named keys: 
 
<|"z" -> 1, "x" -> 2, "b" -> 3, "a" -> 4|>  // Query["x" ;; "a"] 
 
 
 
...
 

- asked by alancalvitti (9 votes), answered by Mr.Wizard (11 votes)

4.3.1.6 Finding Ramanujan's taxicab numbers

http://mathematica.stackexchange.com/questions/135128/finding-ramanujans-taxicab-numbers

 
How to find Hardy-Ramanujan Numbers by using Mathematica? 
 
 
Definition: 
Taxicab number is defined as the smallest number that can be expressed as a sum of two positive cubes in $n$ distinct ways. 
...
 

- asked by vito (9 votes), answered by vito (6 votes)

4.3.1.7 Area of surface of revolution

http://mathematica.stackexchange.com/questions/135358/area-of-surface-of-revolution

 
I am asked to rotate the curve $y=\sqrt{4-x^2}$ from $x=-1$ to $x=1$ about the x-axis and find the area of the surface. I was able to use RevolutionPlot3D to show the surface. 
 
RevolutionPlot3D[Sqrt[4  ...
 

- asked by David (7 votes), answered by corey979 (10 votes)