Question: 2. Write a function center t_] in Mathematica that takes as input a number t and as output returns the point (t cos(t), tsin(t)). This

 2. Write a function center t_] in Mathematica that takes as

2. Write a function center t_] in Mathematica that takes as input a number t and as output returns the point (t cos(t), tsin(t)). This will represent the center of a disk we are going to draw. For example, center (7] will be the center of the 7th disk we draw. Define radius[1]=1. For t > 1, define radius[t-] to be the radius so that the disk with center center[t] and radius radius t] is tangent to the disk with center(t+1] and radius t+1]. Hint: Use the Norm command to find the distance between the centers of the circles. Draw these disks for t = 1, 2, 3, ..., 100, and have the hue change from 1/10,2/10,... (so the hue will repeat in cycles of 10.)

Step by Step Solution

There are 3 Steps involved in it

1 Expert Approved Answer
Step: 1 Unlock blur-text-image
Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock
Step: 3 Unlock

Students Have Also Explored These Related Mathematics Questions!