Physics Day 2

  1. Polarization demonstration.  Use webcam.
  2. Visible color range vs audible frequency range
  3. Linear functions
  4. do[x_] := x^2;\
    xsize = 10;\
    ysize = 10;\
    Plot[{
    do[x],
    do[x]
    }, {x, -xsize, xsize}, PlotRange -> {-ysize, ysize},PlotStyle -> {Red, Blue},
    AspectRatio -> 1,
    GridLines -> {Range[-xsize, xsize], Range[-ysize, ysize]}]
  5. Derivatives
  6. do[x_] := x+1;
    xsize = 10;
    ysize = 10;
    Manipulate[Plot[{
    do[x],
    do’[p] (x – p) + do[p]
    }, {x, -xsize, xsize}, PlotRange -> {-ysize, ysize},
    PlotStyle -> {Red, Blue}, AspectRatio -> 1,
    GridLines -> {Range[-xsize, xsize], Range[-ysize, ysize]},
    Epilog -> {Red, PointSize -> 0.02, Point[{p, do[p]}]}], {{p,
    0}, -xsize, xsize}]
  7. Harmonics must be integers
  8. Musical notes versus frequencies
  9. The circle of 5ths and vs well tempered scale
  10. Superimposition of the wave
  11. Beat simulation and beat demonstration
  12. Manipulate[
    Column[{
    Plot[Sin[f1 x], {x, 0, 10 Pi}, PlotRange -> {-2, 2},
    ImageSize -> 400],
    Plot[Sin[f2 x], {x, 0, 10 Pi}, PlotRange -> {-2, 2},
    ImageSize -> 400],
    Plot[Sin[f1 x] + Sin[f2 x], {x, 0, 10 Pi}, PlotRange -> {-2, 2},
    ImageSize -> 400]
    }], {{f1, 1}, 1, 5}, {{f2, 1}, 1, 5}]
  13. Play[Sin[440 2 Pi t] + Sin[440 2 Pi t], {t, 0, 1}]
  14. Thin film interference.  Double pane glass.  Glass coating.  Rear view mirror.
  15. Newton’s Ring
  16. Laser Interference pattern. Double slit experiment
  17. https://phet.colorado.edu/en/simulation/legacy/wave-interference
  18. Sound Interference
  19. https://phet.colorado.edu/en/simulation/legacy/sound
  20. Slit interference pattern
  21. http://demonstrations.wolfram.com/IntensityDistributionForMultipleSlitDiffraction/