<html>
<head>
<meta content="text/html; charset=windows-1252"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
Hola:<br>
<br>
Creo que esta es la solución que buscas.<br>
<br>
datIn$semana <- week( mdy( datIn$CST ) ) <br>
datIn$semana<br>
plot( datIn$semana, datIn$PrecipitationIn, pch = 20, cex = 0.3 )<br>
<br>
Te adjunto un fichero .Rmd para que lo verifiques in situ.<br>
<br>
Saludos<br>
<br>
<br>
<div class="moz-cite-prefix">El 16/01/16 a las 11:49, jbetancourt
escribió:<br>
</div>
<blockquote cite="mid:201601160546205226196@iscmc.cmw.sld.cu"
type="cite">
<meta content="text/html; charset=windows-1252"
http-equiv="Content-Type">
<style>BLOCKQUOTE {
MARGIN-BOTTOM: 0px; MARGIN-LEFT: 2em; MARGIN-TOP: 0px
}
OL {
MARGIN-BOTTOM: 0px; MARGIN-TOP: 0px
}
UL {
MARGIN-BOTTOM: 0px; MARGIN-TOP: 0px
}
</style>
<meta name="GENERATOR" content="MSHTML 10.00.9200.16384">
<font size="2">
<div> </div>
<div>
<div><font face="">Estimados</font></div>
<div><font face="">Muchas gracias por su ayuda. No he logrado convertir los datos de climas diarios a datos por semana, es decir</font></div>
<div><font face=""> que junto a la identificación de las semanas, quisiera que los datos climaticos de cada semana se reflejaran </font></div>
<div><font face="">en cada semana .Adjunto datos</font></div>
<div><font face="">Ejemplo</font></div>
<div><font face="">semana48 Max.TemperatureF Mean.TemperatureF Min.TemperatureF etc</font></div>
<div><font face="">Perdonen mis limitados conocimientos</font></div>
<div> </div>
<div><font face="">LOS SCRIPT ENVIADOS
FUNCIONARON PARA IDENTIFICAR LA SEMANA</font></div>
<div><font face="">#####################################</font></div>
<div><font face="">rm(list = ls()) </font></div>
<div><font face="">#setwd("D:/Public/Documents/R/r_epidemiología/") </font></div>
<div><font face="">datIn <- read.table("clima.csv", header=T, as.is=TRUE, sep=",")</font></div>
<div><font face="">datIn</font></div>
<div><font face="">library(lubridate)</font></div>
<div><font face="">#datIn$fecha <- mdy(datIn$CST)</font></div>
<div><font face="">datIn$semana <- week(datIn$fecha)</font></div>
<div><font face="">datIn$semana</font></div>
<div><font face="">##################################################</font></div>
<div><font face="">library("lubridate")</font></div>
<div><font face="">data <- read.csv("clima.csv", stringsAsFactors=F)</font></div>
<div><font face=""># mdy() para formato m/d/y. existe dmy() para formato d/m/y</font></div>
<div><font face="">woy <- week(mdy(data$CST)) #week of year</font></div>
<div><font face="">woy</font></div>
<div><font face="">SEMANAS</font></div>
<div><font face="">1 1 1 1 1 1 1 2 2 2 2 2 2 2 3 3 3 3 3 3 3 4 4 4 4 4 4</font></div>
<div><font face=""> [28] 4 5 5 5 5 5 5 5 6 6 6 6 6 6 6 7 7 7 7 7 7 7 8 8 8 8 8</font></div>
<div><font face=""> [55] 8 8 9 9 9 9 9 9 9 10 10 10 10 10 10 10 11 11 11 11 11 11 11 12 12 12 12</font></div>
<div><font face=""> [82] 12 12 12 13 13 13 13 13 13 13 14 14 14 14 14 14 14 15 15 15 15 15 15 15 16 16 16</font></div>
<div><font face="">[109] 16 16 16 16 17 17 17 17 17 17 17 18 18 18 18 18 18 18 19 19 19 19 19 19 19 20 20</font></div>
<div><font face="">[136] 20 20 20 20 20 21 21 21 21 21 21 21 22 22 22 22 22 22 22 23 23 23 23 23 23 23 24</font></div>
<div><font face="">[163] 24 24 24 24 24 24 25 25 25 25 25 25 25 26 26 26 26 26 26 26 27 27 27 27 27 27 27</font></div>
<div><font face="">[190] 28 28 28 28 28 28 28 29 29 29 29 29 29 29 30 30 30 30 30 30 30 31 31 31 31 31 31</font></div>
<div><font face="">[217] 31 32 32 32 32 32 32 32 33 33 33 33 33 33 33 34 34 34 34 34 34 34 35 35 35 35 35</font></div>
<div><font face="">[244] 35 35 36 36 36 36 36 36 36 37 37 37 37 37 37 37 38 38 38 38 38 38 38 39 39 39 39</font></div>
<div><font face="">[271] 39 39 39 40 40 40 40 40 40 40 41 41 41 41 41 41 41 42 42 42 42 42 42 42 43 43 43</font></div>
<div><font face="">[298] 43 43 43 43 44 44 44 44 44 44 44 45 45 45 45 45 45 45 46 46 46 46 46 46 46 47 47</font></div>
<div><font face="">[325] 47 47 47 47 47 48 48 48 48 48 48 48 49 49 49 49 49 49 49 50 50 50 50 50 50 50 51</font></div>
<div><font face="">[352] 51 51 51 51 51 51 52 52 52 52 52 52 52 53</font></div>
</div>
</font>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-help-es mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-help-es@r-project.org">R-help-es@r-project.org</a>
<a class="moz-txt-link-freetext" href="https://stat.ethz.ch/mailman/listinfo/r-help-es">https://stat.ethz.ch/mailman/listinfo/r-help-es</a></pre>
</blockquote>
<br>
<pre class="moz-signature" cols="72">--
___________________________________________________________
José Antonio Palazón Ferrando
Profesor Titular. Departamento de Ecología e Hidrología.
Facultad de Biología. Universidad de Murcia.
Campus Universitario de Espinardo
30100 MURCIA-SPAIN
Telf: +34 868 88 49 80
Fax : +34 868 88 39 63
Email: <a class="moz-txt-link-abbreviated" href="mailto:palazon@um.es">palazon@um.es</a>
<a class="moz-txt-link-freetext" href="http://webs.um.es/palazon">http://webs.um.es/palazon</a></pre>
</body>
</html>