UAV Network REU 2020

No preview image

1 collaborator

WHAT IS IT?

This model creates 3D shapes out of 2D turtles by mapping turtles between cartesian and spherical three-dimensional coordinates.

HOW IT WORKS

To create the 3D shapes the program randomly generates turtles about the shell of the shape in either cartesian (x, y, z) or spherical (theta, phi, z) coordinates, depending on which is easier to accomplish but always stores the information converting when necessary in spherical coordinates. To render the sphere in the NetLogo view, it translates the turtles from spherical to cartesian coordinates using color to simulate depth. The positions of the turtles are always stored as spherical coordinates because they are rotated on the z-axis, and the simplest way to do so is to increase theta in spherical coordinates.

Converting from cartesian to spherical coordinates:

x = r * cos(theta) = p * sin(phi) * cos(theta) y = r * sin(theta) = p * sin(phi) * sin(theta) z = p * cos(theta)

theta: angle of the turtle's projection on the x-y plane. phi: turtles angle of incidence to the z axis. p: distance of the turtle from the origin.

HOW TO USE IT

Click the different setup-SHAPE buttons to generate different 3D shapes. The turtles are randomly distributed about the surface of the shape. Click the go (forever) button to run the model.

GO starts rotating the model.

COLOR determines the color that is used to simulate depth in generating the various shapes (uses predefined NetLogo color constants).

NUM-TURTLES determines the number of turtles that are used to generate the various shapes.

SHAPE-SIZE determines the overall size of the shape. Most often it is radius or edge length.

THETA-VELOCITY determines the speed at which the turtles are rotated.

(Rotating turtles in the rotate-turtles procedure is implemented simply by increasing each turtle's theta variable by theta-velocity! Rotating turtles (around the z-axis) is easy in spherical coordinates. However it's far easier to transpose turtles in cartesian coordinates.)

THINGS TO NOTICE

Notice that turtles closer (positive) on the y-axis appear lighter in shade and turtles further away (negative) appear darker in shade.

THINGS TO TRY

Try adjusting the theta-vel or render-color slider as the model is running. This will provide real time feedback to your adjustments.

EXTENDING THE MODEL

[EASY] Adjust the setup-square procedure to generate a rectangle.

Create a procedure to transpose turtle coordinates. Remember that it is easier to transpose in cartesian coordinates.

Create a procedure to generate new 3D geometries.

Try animating the phi variable. Conceptually why does this not make sense?

Create a procedure to rotate the geometries on a different axis.

[VERY DIFFICULT] Create a procedure to view the geometries at ANY angle instead of the present three.

NETLOGO FEATURES

Notice the use of scale-color to show the depth of turtles and thereby simulate 3D.

HOW TO CITE

If you mention this model or the NetLogo software in a publication, we ask that you include the citations below.

For the model itself:

Wilensky, U. (1998). NetLogo 3D Solids model. http://ccl.northwestern.edu/netlogo/models/3DSolids. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.

Please cite the NetLogo software as:

Wilensky, U. (1999). NetLogo. http://ccl.northwestern.edu/netlogo/. Center for Connected Learning and Computer-Based Modeling, Northwestern University, Evanston, IL.

COPYRIGHT AND LICENSE

CC BY-NC-SA 3.0

This work is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 License. To view a copy of this license, visit https://creativecommons.org/licenses/by-nc-sa/3.0/ or send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA.

Commercial licenses are also available. To inquire about commercial licenses, please contact Uri Wilensky at uri@northwestern.edu.

This model was created as part of the project: CONNECTED MATHEMATICS: MAKING SENSE OF COMPLEX PHENOMENA THROUGH BUILDING OBJECT-BASED PARALLEL MODELS (OBPML). The project gratefully acknowledges the support of the National Science Foundation (Applications of Advanced Technologies Program) -- grant numbers RED #9552950 and REC #9632612.

This model was converted to NetLogo as part of the projects: PARTICIPATORY SIMULATIONS: NETWORK-BASED DESIGN FOR SYSTEMS LEARNING IN CLASSROOMS and/or INTEGRATED SIMULATION AND MODELING ENVIRONMENT. The project gratefully acknowledges the support of the National Science Foundation (REPP & ROLE programs) -- grant numbers REC #9814682 and REC-0126227. Converted from StarLogoT to NetLogo, 2001.

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model

breed[actors actor]
breed[attackers attacker]
globals[id msg]
breed[sinks sink]
links-own[distance-ag]
actors-own[
sender_id
message_send
message
my_id
message-sum
my-list
]

to setup
 clear-all
  reset-ticks

  create-sinks 1;
  [
     setxy xcor ycor ;
  ]

  create-actors NumActors ;
  [

    setxy random-xcor random-ycor 

    create-link-to one-of sinks
  ]
  create-attackers 1 [
      setxy random-xcor random-ycor 
  ]

  ask sinks
  [
    set shape "airplane"
    set size 10
    set color red
    set label "sink"
  ]

   ask actors
  [
    set shape "default"
    set size 10
    set color yellow
    set label who
    set my-list []
  ]

  ask attackers [
  set shape "default"
  set size 10
  set color red
  set label "Attacker"

  ]

  ask turtles[
    if any? links[

        layout-spring turtles links 0.1 5 1]]


  ask actors [

  layout-spring actors no-links 0.1 .5 10
  ]
end 

to go
  ask attackers[
    face actor 1
  ]
ask turtles[
    if any? links[

        layout-spring turtles links 0.1 5 1]]


  ask actors [
  layout-spring actors no-links 0.1 .5 10
  ]

  ask attackers [
     repeat 5 [ fd 0 wait 0.5 ]
    forward 10
    face actor 1]

  ask one-of actors[
ifelse label = "traitor"[
       set color red
    ]
    [
 set color white
  set label "receiver"
  ask other actors in-radius 20[
     ifelse label = "traitor"[
        set color red]
        [
    set color blue
          set id who]
    ]
    set my-list fput id my-list
    print my-list
    ]
    ]
ask actors with [color = blue] [
    set label who
    set message  ( (random 2) + 1)
    print " Message sent"
    set my-list []
   ask actors with [color = white] [
  repeat 1 [ fd 0 wait 0.5 ]
   message-action
    repeat 1 [ fd 0 wait 0.5 ]
      set msg 0
      set message 0
  ]
  ]

  ask attackers [
    if any? turtles in-radius 5[
     left 60 forward 3
    ]
    wander
    face actor 1
    repeat 5 [ fd 0 wait 0.5 ]

    ask  actor 1 [
      ifelse label = "traitor" [
      wander]
      [
    set color yellow
    set label "receiver"
    repeat 5 [ fd 0 wait 0.5 ]
      ]
    ]
  ]
  ask actors with [label = "receiver"] [
    if empty? my-list [
      ask my-links[set color red]
      set label "traitor"
    ]
  ]
  ask sinks[
    ask my-links with[ color = red ] [die]
  ]
  ask actors with [label = "traitor"] [ wander]
end 

to wander
  fd random 5
  rt (random 30) - 20
end 

to message-action
  set message-sum ((sum [message] of actors with [color = blue]))
    show message-sum
  if message-sum <  5[ ask actors with [color = white]  [ set color pink]]
  if message-sum >= 5 [ ask actors with [color = white][ set color violet]]
end 


; Copyright 1998 Uri Wilensky.
; See Info tab for full copyright and license.

There is only one version of this model, created over 3 years ago by Luis Espiritusanto.

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.

NetLogo