Competing Technologies (iPhone vs Blackberry)

No preview image

1 collaborator

Default-person Felix Hu (Author)

Tags

(This model has yet to be categorized with any tags)
Model group MAM-2013 | Visible to everyone | Changeable by everyone
Model was written in NetLogo 5.0.4 • Viewed 236 times • Downloaded 21 times • Run 0 times
Download the 'Competing Technologies (iPhone vs Blackberry)' modelDownload this modelEmbed this model

Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)


Comments and Questions

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

Click to Run Model

breed [customers customer]
turtles-own [group-pref tech-pref fickleness]
globals [marketing-iphone-global marketing-blackberry-global]

to setup
  clear-all
  
  set marketing-iphone-global 0
  set marketing-blackberry-global 0
  
  set-default-shape customers "circle"
  create-customers initial-customers [
    ifelse random 100 < initial-iphone-percent [
      set color white
    ][
      set color turquoise
    ]
    create-helper
  ]
  ask turtles [
    if random 100 < isolation [
      create-links
    ]
  ]
  reset-ticks
end 

to create-helper
  setxy random-xcor random-ycor
  set size .3
  set group-pref random 20
  set tech-pref random 20
  set fickleness random 20
end 

to go
  if marketing-iphone-global != marketing-iphone [updating-marketing]
  if marketing-blackberry-global != marketing-blackberry [updating-marketing]
  
  create-customers 1 [
    create-helper
    create-links
    set-phone-choice
  ]
  tick
end 

to set-phone-choice 
  set-according-to-neighbors
  set-according-to-tech
  set-according-to-marketing
end 

to set-according-to-neighbors
  let blackberry-neighbors 0
  let iphone-neighbors 0
  if any? link-neighbors [
    ask link-neighbors [
      if color = turquoise [
        set blackberry-neighbors blackberry-neighbors + 1
      ]
      if color = white [
        set iphone-neighbors iphone-neighbors + 1
      ]
    ]
  ]
  let sum-of-preferences (count link-neighbors) * group-pref
  ifelse random sum-of-preferences < blackberry-neighbors * group-pref [
    set color turquoise
  ][
    set color white
  ]
end 

to set-according-to-tech
  let sum-of-tech tech-pref * (tech-iphone + tech-blackberry)
  
  ifelse random sum-of-tech < tech-pref * tech-blackberry [
    set color turquoise
  ][
    set color white
  ]
end 

to set-according-to-marketing
  ifelse pcolor = black [
    if random 20 < fickleness [
      set color white
    ]
  ][
    if random 20 < fickleness [
      set color turquoise
    ]
  ]
end 

to updating-marketing
  ask patches [
    ifelse random (marketing-iphone + marketing-blackberry) < marketing-iphone [
      set pcolor black
    ][
      set pcolor blue
    ]
  ]
  set marketing-iphone-global marketing-iphone
  set marketing-blackberry-global marketing-blackberry
end 

to create-links 
  if random 100 < isolation [
    repeat random network-density [create-link-with one-of other turtles] 
  ]
end 

There is only one version of this model, created about 6 years ago by Felix Hu.

Attached files

File Type Description Last updated
FelixHu_May20.docx word Progress Report about 6 years ago, by Felix Hu Download
FelixHu_May27.docx word Progress Report almost 6 years ago, by Felix Hu Download

This model does not have any ancestors.

Children:

Graph of models related to 'Competing Technologies (iPhone vs Blackberry)'