<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2900.3429" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>Tenho esta situação:</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>
<DIV><FONT face=Arial 
color=#0000ff>f=rmultinom(30,3,prob=c(0.5,0.3,0.8))*dmultinom(x=1:3,prob=c(0.5,0.3,0.8))<BR> n=5<BR> for(i 
in 1:n){<BR> g=f<BR>contour(g)<BR>}</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff>#preciso que gere 5 gráficos diferentes (mas 
não parece que gera gráficos #diferentes)<BR>jpeg(filename = 
"MeusGraficos%03d.jpg", width = 480, height = 480)<BR>for (i in 1:5) 
contour(g)</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff>dev.off()</FONT></DIV></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial color=#0000ff>E como adapto o caso da normal para o 
multinomial para fazer gráfico 3D, já tentei mas acusa medidas 
diferentes.</FONT></DIV>
<DIV><FONT face=Arial color=#0000ff>z <- 
matrix(rnorm(50*10),50,10)<BR>image(z)<BR>persp(z)</FONT></DIV></BODY></HTML>