-
Notifications
You must be signed in to change notification settings - Fork 1
/
deflu_h.jl
36 lines (32 loc) · 1.42 KB
/
deflu_h.jl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
using Dates, XLSX, Plots, DataFrames
using CSV
#pasta_principal = "Dropbox/LAC/Alocação de unidades/Curtissimo Cascata Finardi"
if ~occursin("Finardi", pwd())
try
cd("Dropbox/LAC/Alocação de unidades/Curtissimo Cascata Finardi")
catch
nothing
end
end
pasta_dados = "Dados/Dessem/"
deflant = string(pasta_dados,"deflant.dat")
df = CSV.File(deflant; header=false) |> DataFrame! #abrindo deflant.dat
##
aux = df[!, 1] #pegando as informações
posic = 4 #posição do começo da tabela
deflu_h = aux[posic:end] #pegando tabela inteira
colunas = Symbol.(split(deflu_h[1])[2:end]) #pegando o nome das colunas
colunas[6] = :mi
colunas[9] = :mf
deflu_h = split.(deflu_h[3:end]) #pegando só os dados e transformando em matrix
deflu_h = convert.(Array{Any}, deflu_h) #transformando o tipo para Any
df_temp = Array(DataFrame(deflu_h)) #transformando em DataFrame e depois em Array para transport
if size(df_temp)[1]<11 #11 é o número de colunas, contando a coluna de "DEFANT"
df_temp = vcat(df_temp[1:8,1:end],zeros(2,size(df_temp)[2]),df_temp[end:end,1:end])# adicionando duas colunas faltantes
end
array_temp = permutedims(df_temp) #transpondo
df = DataFrame(array_temp) #transformando em DataFrame
df = df[!,2:end] #retirando a primeira coluna (DP)
rename!(df, colunas) #renomeando as colunas
CSV.write(string(pasta_dados,"deflu_h.csv"), df)
println("Arquivo \"deflu_h.csv\" criado")