When I run my code, I always have the same error, I don´t know what I´m doing wrong
# I upload these packages because I need to work with my data base, join some databases
library(tidyverse)
library(fitdistrplus)
library(MASS)
library(survival)
#these are my data frames
df41 = read.table("2014_1.csv",sep=";",header=T)
df42 = read.table("2014_2.csv",sep=";",header=T)
df43 = read.table("2014_3.csv",sep=";",header=T)
df44 = read.table("2014_4.csv",sep=";",header=T)
df51 = read.table("2015_1.csv",sep=";",header=T)
df52 = read.table("2015_2.csv",sep=";",header=T)
df53 = read.table("2015_3.csv",sep=";",header=T)
df54 = read.table("2015_4.csv",sep=";",header=T)
df61 = read.table("2016_1.csv",sep=";",header=T)
df62 = read.table("2016_2.csv",sep=";",header=T)
df63 = read.table("2016_3.csv",sep=";",header=T)
df64 = read.table("2016_4.csv",sep=";",header=T)
df71 = read.table("2017_1.csv",sep=";",header=T)
df72 = read.table("2017_2.csv",sep=";",header=T)
df73 = read.table("2017_3.csv",sep=";",header=T)
df74 = read.table("2017_4.csv",sep=";",header=T)
df81 = read.table("2018_1.csv",sep=";",header=T)
df82 = read.table("2018_2.csv",sep=";",header=T)
df83 = read.table("2018_3.csv",sep=";",header=T)
df84 = read.table("2018_4.csv",sep=";",header=T)
df91 = read.table("2019_1.csv",sep=";",header=T)
#some tests that im doing with my data frames
names(df41)
names(df42)
names(df41) == names(df42)
str(df41)
summary(df41)
names(df41)
#Here, I choose the columns "POTENCIA_BRUTA_MWH" and "CONCENTRACION_PORCENTAJE_CO2" and then I filter them with the values distinct of 0 or NA
df41_n = df41 %>% select(c("POTENCIA_BRUTA_MWH","CONCENTRACION_PORCENTAJE_CO2")) %>%
filter(POTENCIA_BRUTA_MWH != 0 | POTENCIA_BRUTA_MWH != is.na(df41),CONCENTRACION_PORCENTAJE_CO2 != 0 | CONCENTRACION_PORCENTAJE_CO2 != is.na(df41))
summary(df41_n$POTENCIA_BRUTA_MWH)
summary(df41_n$CONCENTRACION_PORCENTAJE_CO2)
When I run my code, in the line of df41_n, they always show me that error:
df41_n = df41 %>% select(c("POTENCIA_BRUTA_MWH","CONCENTRACION_PORCENTAJE_CO2")) %>%
+ filter(POTENCIA_BRUTA_MWH != 0 | POTENCIA_BRUTA_MWH != is.na(df41),CONCENTRACION_PORCENTAJE_CO2 != 0 | CONCENTRACION_PORCENTAJE_CO2 != is.na(df41))
Error in select(., c("POTENCIA_BRUTA_MWH", "CONCENTRACION_PORCENTAJE_CO2")) Error in select (c("POTENCIA_BRUTA_MWH", "CONCENTRACION_PORCENTAJE_CO2"))
But the lines:
summary(df41_n$POTENCIA_BRUTA_MWH)
summary(df41_n$CONCENTRACION_PORCENTAJE_CO2)
works very well, so, I don't know what I'm doing wrong