[R-br] trabalhar com ifelse
alanarocha em sapo.pt
alanarocha em sapo.pt
Segunda Fevereiro 4 14:03:56 BRST 2013
Boa tarde,
estou a fazer um trabalho onde tenho de usar ifs
gostaria de saber se o meu if está bem construido, senão o que devo alterar.
ficheiro:
setwd("G:/SIN/Users/Ana Rua")
objectivo<-c("verificar se a percentagem de Hgb de cada clínica é <70%
em 3 meses consecutivos no ano 2012,no caso de serem aparece: 3 meses
abaixo senão aparece ok")
objectivo
dados<-read.table("indicadores.csv",header=TRUE,sep=";")
head(dados)
names(dados)
ifelse(Jan<70&Fev<70&Mar<70){
else{
cat"\n\se for menor que 70 em 3 meses consecutivos, devolve "3meses
mais baixos" e imprime o nome da clinica");
else{
cat(\n\caso contrário devolve OK");
return(Clinica)
resultados
setwd("G:/SIN/Users/Ana Rua")
objectivo<-c("verificar se a percentagem de Hgb de cada clínica é <70%
em 3 meses consecutivos no ano 2012,no caso de serem aparece: 3 meses
abaixo senão aparece ok")
objectivo
[1] "verificar se a percentagem de Hgb de cada clínica é <70% em 3
meses consecutivos no ano 2012,no caso de serem aparece: 3 meses
abaixo senão aparece ok"
dados<-read.table("indicadores.csv",header=TRUE,sep=";")
head(dados)
Clinica Jan Fev Mar Abr Mai Jun Jul Ago Set Out
1 Ponte da Barca 76.1 80.0% 82.8% 83.3% 84.6% 79.4% 84.1% 86.5% 73.1% 63.2%
2 Braga 67.3% 74.0% 72.7% 76.8% 70.7% 79.0% 70.4% 75.5% 72.5% 72.2%
3 Fafe 68.24% 69.1% 73.2% 79.0% 72.6% 84.5% 82.1% 77.4% 79.8% 75.3%
4 Maia 77.4% 80.9% 76.8% 76.0% 76.6% 80.8% 81.1% 81.4% 80.6% 82.6%
5 VNGaia 82.1% 80.7% 82.7% 84.4% 82.0% 78.9% 81.8% 80.9% 77.8% 76.5%
6 SMFeira 78.22% 78.2% 77.0% 80.6% 81.8% 77.6% 63.6% 67.7% 74.2% 71.4%
Nov Dez
1 66.7% 68.7%
2 75.5% 73.9%
3 79.3% 76.7%
4 83.3% 84.9%
5 81.4% 80.4%
6 73.7% 76.0%
names(dados)
[1] "Clinica" "Jan" "Fev" "Mar" "Abr" "Mai" "Jun"
[8] "Jul" "Ago" "Set" "Out" "Nov" "Dez"
com os melhores cumprimentos
Ana Rocha
Mais detalhes sobre a lista de discussão R-br