Resumo
Estas imagens foram criadas para fins didáticos em aulas de Ciências de Ensino Fundamental, mas também podem ser usadas para aulas de Física de Ensino Médio. O objetivo é demonstras as partes da onda (crista, nó, vale) e as medidas (comprimento e amplitude). É possível comparar imagens parecidas, variando a amplitude da onda ou o comprimento.
Imagens produzidas por este código
Código no R ou RStudio
a<-seq(from=0,to=10,by=0.01)
b<-seq(from=0,to=1,by=0.01)
x<-seq(from=0,to=20,by=0.01)
plot(sin(x))
plot(cos(x))
plot(sin(a))
plot(cos(a))
plot(2*sin(a))
plot(1*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(2*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(3*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(4*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(1*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(2*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(3*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(4*a),ylim=c(-4,4),type="l",lwd=5)
#####
dados<-3*sin(2*a)
plot(dados,ylim=c(-4,4),type="l",lwd=5,ylab="", yaxt="n",xlab="",xaxt="n",
main="Onda B")
b<-seq(from=0,to=5,by=0.001)
dados<-1*sin(7.2*b)
dados<-1*sin(3.8*b)
plot(dados,
ylim=c(-2,2),
type="l",lwd=4,
# main="λ = 720nm",
# main="λ = 380nm",
ylab="", yaxt="n",xlab="",xaxt="n")
b<-seq(from=0,to=1,by=0.01)
x<-seq(from=0,to=20,by=0.01)
plot(sin(x))
plot(cos(x))
plot(sin(a))
plot(cos(a))
plot(2*sin(a))
plot(1*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(2*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(3*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(4*sin(a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(1*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(2*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(3*a),ylim=c(-4,4),type="l",lwd=5)
plot(cos(4*a),ylim=c(-4,4),type="l",lwd=5)
#####
dados<-3*sin(2*a)
plot(dados,ylim=c(-4,4),type="l",lwd=5,ylab="", yaxt="n",xlab="",xaxt="n",
main="Onda B")
b<-seq(from=0,to=5,by=0.001)
dados<-1*sin(7.2*b)
dados<-1*sin(3.8*b)
plot(dados,
ylim=c(-2,2),
type="l",lwd=4,
# main="λ = 720nm",
# main="λ = 380nm",
ylab="", yaxt="n",xlab="",xaxt="n")
Nenhum comentário:
Postar um comentário