
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