How to calculate the register reset value? - cpu-registers

I have register defined inside a register model as shown below
virtual function void build();
this.PM_CAP_ID = uvm_reg_field::type_id::create("PM_CAP_ID",,get_full_name());
this.PM_CAP_ID.configure(this, 8, 0, "RO", 0, 8'h1, 1, 0, 1);
this.PM_NEXT_POINTER = uvm_reg_field::type_id::create("PM_NEXT_POINTER",,get_full_name());
this.PM_NEXT_POINTER.configure(this, 8, 8, "RO", 0, 8'h50, 1, 0, 1);
this.PM_SPEC_VER = uvm_reg_field::type_id::create("PM_SPEC_VER",,get_full_name());
this.PM_SPEC_VER.configure(this, 3, 16, "RO", 0, 3'h3, 1, 0, 0);
this.PME_CLK = uvm_reg_field::type_id::create("PME_CLK",,get_full_name());
this.PME_CLK.configure(this, 1, 19, "RO", 0, 1'h0, 1, 0, 0);
this.Reserved_20_20 = uvm_reg_field::type_id::create("Reserved_20_20",,get_full_name());
this.Reserved_20_20.configure(this, 1, 20, "RO", 0, 1'h0, 0, 0, 0);
uvm_resource_db#(bit)::set({"REG::", Reserved_20_20.get_full_name()}, "NO_REG_TESTS", 1, this);
uvm_resource_db#(bit)::set({"REG::", Reserved_20_20.get_full_name()}, {Reserved_20_20.get_full_name(), "_NO_REG_TESTS"}, 1, this);
this.DSI = uvm_reg_field::type_id::create("DSI",,get_full_name());
this.DSI.configure(this, 1, 21, "RO", 0, 1'h0, 1, 0, 0);
this.AUX_CURR = uvm_reg_field::type_id::create("AUX_CURR",,get_full_name());
this.AUX_CURR.configure(this, 3, 22, "RO", 0, 3'h7, 1, 0, 0);
this.D1_SUPPORT = uvm_reg_field::type_id::create("D1_SUPPORT",,get_full_name());
this.D1_SUPPORT.configure(this, 1, 25, "RO", 0, 1'h1, 1, 0, 0);
this.D2_SUPPORT = uvm_reg_field::type_id::create("D2_SUPPORT",,get_full_name());
this.D2_SUPPORT.configure(this, 1, 26, "RO", 0, 1'h1, 1, 0, 0);
this.PME_SUPPORT = uvm_reg_field::type_id::create("PME_SUPPORT",,get_full_name());
this.PME_SUPPORT.configure(this, 5, 27, "RO", 1, 5'h1b, 1, 0, 0);
uvm_resource_db#(bit)::set({"REG::", PME_SUPPORT.get_full_name()}, "NO_REG_BIT_BASH_TEST", 1, this);
uvm_resource_db#(bit)::set({"REG::", PME_SUPPORT.get_full_name()}, {PME_SUPPORT.get_full_name(), "_NO_REG_BIT_BASH_TEST"}, 1, this);
endfunction: build
In configure, the 6th position from the left gives the reset value. How to combine all these reset values of individual fields and arrive at a final value?

You can use the function get_reset() in the uvm_reg:
For example:
<reg_instance>.get_reset();

Related

Representing a correlation matrix without a "classical" heatmap

I'm doing some analysis on a complex network. I have computed the degree correlation matrix, which looks like this:
data[1:5, 1:5]
1 2 3 4 5
1 6 19 11 16 5
2 19 10 16 12 6
3 11 16 7 11 10
4 16 12 11 5 9
5 5 6 10 9 8
And I'd like to plot it to obtain something akin to this:
I've tried to use ggplot but the results are not at all satisfying, this is my code:
library(reshape2)
library(ggplot2)
data = melt(data)
#The "melt" function was used to turn the matrix in a three column dataframe with columns named "Var1",
"Var2", and "value"
ggplot(data = data) +
theme_bw() +
geom_tile(aes(x = Var1, y = Var2, fill = value)) +
scale_fill_viridis(name = "") +
labs(x = "k2", y = "k1")
And this is what I get:
Is there any way to fix it?
P.S. Sorry if I couldn't post the images directly, but my reputation is not high enough
EDIT: I'm putting here the dput() output of my matrix, as asked in the comments:
structure(c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0,
0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0,
0, 0, 2, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0,
0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0,
0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 2, 1, 1, 1, 0, 0, 1,
2, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1,
0, 0, 2, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 1, 0, 1, 2, 0,
0, 1, 0, 2, 0, 0, 2, 2, 0, 0, 0, 0, 0, 1, 1, 1, 0, 2, 0, 0, 0,
1, 0, 0, 0, 2, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 3, 2, 1, 0, 3, 3, 3, 1, 2, 2, 1,
1, 3, 3, 3, 2, 2, 1, 0, 1, 3, 2, 1, 1, 2, 0, 4, 1, 1, 1, 0, 0,
0, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 2,
3, 0, 3, 6, 3, 2, 2, 3, 0, 2, 4, 2, 0, 6, 3, 1, 0, 3, 1, 2, 5,
6, 2, 3, 0, 2, 0, 0, 1, 0, 0, 0, 1, 3, 1, 1, 0, 2, 0, 0, 0, 0,
0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 3, 2, 7, 2, 1, 6, 3, 1,
3, 2, 2, 3, 2, 3, 9, 0, 1, 2, 4, 0, 6, 0, 3, 0, 4, 0, 2, 0, 2,
0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0,
0, 0, 0, 1, 6, 7, 3, 6, 0, 5, 0, 1, 0, 5, 1, 3, 4, 1, 5, 0, 0,
0, 4, 1, 5, 1, 2, 1, 1, 1, 5, 1, 4, 1, 0, 0, 1, 0, 0, 1, 1, 0,
2, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0,
1, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 3, 2, 6, 1, 5,
3, 0, 0, 2, 3, 0, 3, 2, 4, 5, 1, 1, 3, 2, 3, 4, 0, 2, 0, 2, 3,
0, 0, 1, 0, 0, 0, 1, 2, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0, 0, 0, 1,
0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 2, 1, 1, 0, 0,
0, 1, 1, 1, 0, 0, 3, 2, 1, 0, 5, 3, 2, 6, 1, 3, 3, 1, 4, 2, 1,
6, 1, 2, 0, 4, 2, 4, 0, 1, 0, 3, 3, 4, 2, 3, 4, 1, 0, 3, 3, 0,
1, 1, 0, 4, 0, 2, 0, 1, 0, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0, 0, 1,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 2, 3, 2, 6,
5, 3, 2, 0, 2, 2, 4, 9, 3, 0, 4, 1, 5, 4, 7, 2, 1, 3, 5, 4, 1,
4, 3, 6, 3, 1, 0, 2, 0, 1, 3, 1, 1, 0, 1, 1, 2, 0, 0, 0, 0, 1,
2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 3, 3, 3, 0, 0, 6, 2, 1, 0, 1, 5, 1,
0, 5, 1, 7, 1, 4, 2, 3, 2, 6, 1, 3, 1, 0, 0, 2, 1, 0, 2, 1, 0,
0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 1, 1, 0, 1, 2, 0, 0, 1, 0, 0, 0, 4, 0, 1, 0, 0, 1, 1, 0,
3, 1, 1, 0, 2, 0, 3, 0, 1, 2, 0, 0, 0, 2, 0, 1, 1, 0, 6, 1, 0,
0, 0, 1, 1, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 2, 2, 2, 3, 0, 2, 3, 4, 1, 1,
0, 3, 0, 2, 3, 1, 2, 3, 3, 5, 6, 2, 6, 3, 4, 1, 4, 1, 3, 3, 3,
3, 1, 0, 2, 1, 0, 1, 6, 3, 6, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 2, 2, 4, 2, 5, 3, 3, 9, 5, 0, 3, 2, 1, 4, 7, 4, 2, 4, 6,
3, 4, 3, 12, 0, 3, 2, 3, 2, 2, 3, 1, 1, 0, 1, 5, 3, 2, 1, 2,
0, 6, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 2, 2, 1, 0,
1, 3, 1, 0, 0, 1, 0, 1, 4, 2, 1, 1, 0, 2, 1, 1, 1, 1, 2, 2, 3,
2, 0, 1, 2, 2, 3, 0, 1, 1, 0, 1, 4, 1, 3, 0, 1, 0, 3, 0, 1, 0,
1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 1, 0, 3, 3, 3, 4, 0, 0, 0, 2, 4, 1, 1, 3,
3, 1, 3, 2, 1, 3, 3, 2, 0, 1, 0, 2, 2, 0, 1, 2, 0, 0, 0, 2, 2,
1, 0, 3, 0, 5, 0, 0, 0, 1, 2, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 6,
2, 4, 2, 2, 4, 5, 4, 3, 7, 4, 3, 0, 3, 4, 1, 4, 4, 3, 6, 6, 1,
5, 3, 6, 2, 3, 1, 1, 2, 2, 2, 1, 2, 0, 2, 5, 2, 3, 0, 2, 0, 2,
0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 3, 3, 3, 1, 4, 1, 1, 1, 0, 1, 4,
2, 3, 3, 0, 1, 1, 4, 3, 3, 3, 5, 1, 3, 1, 7, 5, 3, 6, 2, 1, 1,
0, 6, 1, 1, 2, 3, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,
0, 3, 1, 9, 5, 5, 6, 5, 7, 1, 2, 2, 1, 1, 4, 1, 0, 2, 10, 5,
7, 5, 8, 3, 7, 3, 6, 5, 4, 3, 3, 7, 2, 0, 4, 3, 0, 1, 1, 0, 5,
0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 0, 0, 0, 1, 1, 4,
1, 0, 3, 4, 1, 3, 1, 1, 2, 1, 6, 6, 4, 4, 3, 2, 5, 2, 4, 3, 2,
2, 4, 4, 2, 1, 2, 3, 1, 1, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 1, 2, 1, 2, 3, 1, 0, 1, 2, 7, 4, 0, 3, 6, 0, 2, 4, 4, 10,
6, 3, 7, 5, 5, 10, 3, 11, 5, 6, 12, 11, 10, 6, 9, 2, 5, 12, 9,
2, 5, 1, 1, 4, 4, 1, 0, 0, 2, 1, 1, 3, 0, 1, 3, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1,
2, 0, 3, 0, 2, 2, 1, 5, 3, 2, 1, 4, 3, 5, 6, 7, 2, 5, 4, 12,
1, 3, 3, 3, 8, 3, 1, 6, 1, 1, 2, 3, 4, 0, 0, 1, 0, 3, 0, 0, 0,
0, 0, 2, 1, 2, 0, 1, 2, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 2, 4, 4, 2, 4, 1, 3, 1, 6,
4, 1, 3, 3, 3, 7, 4, 5, 5, 1, 6, 7, 3, 3, 3, 5, 4, 4, 3, 4, 3,
1, 1, 3, 2, 1, 2, 1, 4, 4, 1, 1, 0, 0, 2, 2, 0, 1, 0, 3, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 0,
1, 2, 1, 5, 0, 1, 3, 2, 3, 2, 0, 2, 3, 1, 3, 6, 3, 5, 4, 5, 4,
6, 3, 9, 6, 4, 3, 9, 4, 4, 6, 3, 1, 2, 2, 7, 5, 1, 1, 4, 3, 6,
1, 1, 0, 3, 4, 0, 1, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 3, 6, 6, 5, 4, 4, 5,
6, 3, 6, 12, 1, 2, 6, 5, 8, 3, 10, 12, 7, 9, 6, 3, 11, 4, 13,
7, 7, 12, 2, 1, 5, 3, 9, 11, 0, 9, 11, 0, 17, 3, 3, 0, 4, 6,
3, 1, 0, 0, 4, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 0, 1, 0, 0, 4, 1, 1, 3, 0, 1,
0, 1, 1, 3, 2, 3, 1, 3, 6, 3, 0, 7, 4, 3, 3, 0, 1, 5, 2, 1, 1,
2, 5, 1, 2, 3, 1, 5, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 3, 3, 2, 2, 1, 1, 3, 1, 4, 3, 2, 1, 5, 3, 7, 5, 11, 3, 3,
4, 11, 7, 7, 8, 5, 8, 7, 7, 9, 8, 2, 4, 8, 3, 0, 3, 10, 4, 7,
0, 3, 0, 3, 4, 2, 0, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 4,
1, 0, 1, 2, 2, 0, 3, 1, 3, 2, 5, 3, 3, 3, 4, 4, 8, 1, 6, 10,
4, 8, 7, 8, 4, 6, 4, 5, 0, 3, 3, 1, 8, 2, 1, 0, 2, 1, 3, 1, 2,
0, 2, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 2, 2, 4, 1, 2, 3, 3, 0, 2, 4, 3, 3, 2, 6, 7,
6, 4, 6, 3, 5, 9, 13, 3, 5, 6, 4, 4, 9, 7, 11, 8, 3, 5, 15, 6,
1, 5, 3, 8, 14, 4, 3, 0, 3, 4, 1, 2, 5, 0, 3, 4, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 3, 3, 6, 0, 0, 1, 2, 2, 2, 2, 5, 5, 3, 12, 8, 4, 4,
7, 3, 8, 10, 4, 4, 4, 13, 9, 8, 4, 5, 13, 9, 1, 6, 7, 3, 7, 3,
0, 0, 1, 1, 1, 4, 3, 0, 4, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 2, 5, 0, 4, 3, 2,
3, 3, 2, 0, 0, 3, 3, 4, 2, 11, 3, 4, 4, 7, 0, 7, 4, 9, 4, 2,
4, 8, 4, 0, 0, 6, 9, 0, 2, 3, 4, 9, 0, 4, 0, 7, 2, 1, 1, 2, 0,
3, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 2, 1, 1, 0, 1, 0, 2, 1, 1, 0, 3, 3, 1, 1, 1, 6, 3,
2, 10, 1, 3, 6, 12, 1, 7, 8, 7, 13, 4, 2, 6, 6, 8, 2, 10, 9,
1, 4, 7, 5, 12, 2, 2, 0, 6, 5, 5, 3, 1, 3, 5, 7, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1,
0, 2, 4, 1, 3, 0, 0, 1, 3, 1, 2, 2, 1, 2, 3, 4, 6, 6, 4, 3, 2,
5, 9, 7, 11, 9, 8, 6, 2, 5, 6, 5, 9, 8, 1, 3, 5, 3, 10, 3, 3,
0, 4, 3, 4, 3, 4, 0, 2, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 4, 2, 2, 2,
3, 1, 2, 0, 2, 1, 7, 4, 9, 1, 3, 1, 1, 2, 8, 8, 8, 8, 4, 6, 5,
2, 4, 2, 6, 6, 0, 5, 4, 1, 8, 3, 1, 0, 3, 1, 2, 2, 0, 0, 4, 2,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 3, 0, 2, 1, 2, 2, 2,
1, 1, 2, 5, 1, 2, 4, 3, 4, 0, 8, 6, 4, 0, 4, 2, 6, 0, 3, 5, 3,
9, 3, 1, 0, 6, 5, 4, 3, 1, 1, 2, 7, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
1, 0, 0, 0, 1, 0, 0, 2, 0, 0, 1, 5, 2, 1, 2, 3, 1, 4, 6, 5, 5,
0, 2, 5, 2, 4, 0, 3, 4, 0, 0, 5, 1, 2, 1, 0, 0, 1, 1, 0, 0, 0,
0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 1, 0, 3, 1, 1, 1, 3, 3, 0, 0, 2, 5, 1, 2, 1, 6,
4, 2, 12, 3, 3, 7, 9, 2, 8, 4, 15, 13, 6, 10, 9, 6, 2, 3, 5,
8, 3, 8, 9, 7, 20, 6, 4, 0, 7, 6, 2, 2, 4, 1, 5, 2, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 1, 0, 2, 3, 1, 0, 2, 1, 3, 1, 2, 2, 1, 3, 3, 9, 4, 2, 5,
11, 5, 3, 5, 6, 9, 9, 9, 8, 6, 6, 4, 8, 3, 2, 3, 6, 4, 14, 2,
2, 0, 2, 4, 3, 4, 2, 2, 2, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1,
0, 0, 2, 0, 1, 0, 1, 0, 1, 2, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1,
1, 0, 0, 0, 3, 2, 0, 0, 4, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1, 0, 2, 2, 1, 1,
5, 0, 2, 1, 9, 2, 3, 3, 5, 6, 2, 4, 3, 5, 3, 0, 8, 3, 0, 1, 5,
2, 6, 2, 2, 0, 1, 4, 4, 2, 1, 1, 2, 4, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 0, 1, 2,
1, 1, 1, 1, 6, 2, 4, 3, 5, 3, 1, 2, 1, 1, 1, 4, 11, 3, 10, 3,
3, 7, 3, 7, 5, 4, 5, 5, 9, 6, 4, 5, 4, 6, 14, 2, 4, 0, 8, 2,
3, 2, 5, 3, 4, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 3, 0, 1,
0, 2, 1, 0, 0, 1, 0, 4, 3, 0, 1, 4, 1, 8, 3, 4, 5, 3, 1, 3, 1,
7, 4, 1, 2, 6, 4, 6, 7, 5, 0, 6, 1, 2, 4, 1, 2, 2, 6, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 2, 2, 4, 2, 1, 6, 6, 6, 3, 5, 3, 1, 5, 0, 4, 3, 4, 6,
17, 5, 7, 8, 14, 7, 9, 12, 10, 8, 9, 2, 20, 14, 1, 6, 14, 6,
10, 5, 6, 0, 9, 9, 10, 7, 9, 4, 7, 10, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 1, 1, 3, 0, 0, 2, 4,
3, 0, 2, 3, 3, 3, 1, 6, 2, 0, 2, 2, 7, 5, 0, 1, 0, 2, 1, 2, 1,
1, 0, 3, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 1, 0, 1, 0, 1, 0, 2,
1, 1, 0, 1, 0, 1, 1, 3, 0, 3, 1, 3, 0, 4, 2, 3, 1, 1, 0, 4, 2,
1, 2, 4, 5, 6, 1, 0, 0, 3, 1, 3, 4, 1, 2, 1, 6, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 1, 0, 2, 0, 0, 1,
3, 1, 2, 1, 1, 0, 0, 0, 0, 3, 4, 0, 3, 2, 3, 1, 7, 6, 4, 3, 6,
1, 7, 2, 0, 1, 8, 6, 9, 2, 3, 0, 0, 2, 2, 5, 2, 1, 2, 7, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 2, 1, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 2, 0, 0, 0, 2, 2, 0, 2,
4, 6, 1, 4, 1, 4, 1, 2, 5, 3, 1, 5, 1, 6, 4, 1, 4, 2, 1, 9, 1,
1, 0, 2, 0, 1, 1, 1, 2, 1, 5, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0,
1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 2, 2, 0, 3, 1, 2, 3, 1, 1, 1, 5,
4, 2, 4, 0, 2, 3, 0, 4, 3, 2, 10, 2, 3, 0, 2, 1, 0, 2, 2, 2,
2, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 1, 0, 1, 1, 0, 0, 1, 2, 4, 1, 3, 3, 2, 3, 0, 2, 4, 0, 2,
2, 4, 7, 1, 4, 0, 5, 1, 2, 0, 2, 0, 3, 10, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 1, 2, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 3, 2, 1, 0, 0, 0, 2,
2, 5, 3, 2, 1, 4, 0, 1, 0, 4, 2, 1, 1, 5, 1, 9, 1, 1, 0, 2, 1,
2, 2, 0, 2, 1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 1, 0,
1, 2, 0, 1, 3, 2, 4, 0, 2, 0, 1, 2, 2, 0, 2, 0, 0, 3, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 2, 0, 0, 2, 1, 1, 1, 0, 2, 1, 1, 0, 1, 1, 3, 2,
4, 0, 1, 2, 3, 4, 3, 5, 2, 4, 2, 1, 5, 2, 1, 2, 4, 2, 7, 3, 1,
0, 2, 1, 2, 3, 1, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 2, 0, 3, 2, 1, 0, 4, 0, 0, 7, 4, 3, 2, 7, 3,
2, 7, 1, 2, 5, 0, 4, 3, 6, 10, 2, 6, 0, 7, 5, 3, 10, 4, 3, 4,
6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0), dim = c(75L, 75L), dimnames = list(
c("2", "3", "5", "6", "7", "8", "9", "10", "11", "12", "13",
"14", "15", "16", "18", "19", "20", "21", "22", "23", "24",
"25", "26", "27", "28", "29", "30", "31", "32", "33", "34",
"35", "36", "37", "38", "39", "40", "41", "42", "43", "44",
"45", "46", "47", "48", "49", "50", "51", "52", "53", "54",
"55", "56", "57", "58", "59", "60", "61", "62", "63", "64",
"65", "66", "67", "68", "69", "70", "71", "72", "73", "74",
"75", "77", "79", "81"), c("2", "3", "5", "6", "7", "8",
"9", "10", "11", "12", "13", "14", "15", "16", "18", "19",
"20", "21", "22", "23", "24", "25", "26", "27", "28", "29",
"30", "31", "32", "33", "34", "35", "36", "37", "38", "39",
"40", "41", "42", "43", "44", "45", "46", "47", "48", "49",
"50", "51", "52", "53", "54", "55", "56", "57", "58", "59",
"60", "61", "62", "63", "64", "65", "66", "67", "68", "69",
"70", "71", "72", "73", "74", "75", "77", "79", "81")))
You get the lines because you have missing values. The full range is not represented in your data. Here's one way to fill in the missing values using tidyr
library(dplyr)
library(tidyr)
full_range <- function(x) seq(min(x), max(x))
data %>%
as.data.frame() %>%
tibble::rownames_to_column("Var1") %>%
pivot_longer(-Var1, names_to="Var2") %>%
mutate(across(Var1:Var2, as.numeric)) %>% {
d <- .
expand_grid(Var1=full_range(d$Var1), Var2=full_range(d$Var2)) %>%
left_join(d) %>%
replace_na(list(value=0))
} %>%
ggplot() +
theme_bw() +
geom_tile(aes(x = Var1, y = Var2, fill = value)) +
scale_fill_viridis_c(name = "") +
labs(x = "k2", y = "k1")
that looks like this

Missing value where TRUE/FALSE needed error in smcure model

I'm creating a cure model in R to predict Loan Default. I'm seeking someone to help me debug this error. I think it may have to do with my columns.
library(smcure)
smcure(Surv(DURATION, DEFAULT) ~ CHK_ACCT+HISTORY+NEW_CAR+USED_CAR+FURNITURE+`RADIO/TV`+EDUCATION+
RETRAINING+AMOUNT+SAV_ACCT+EMPLOYMENT+INSTALL_RATE+MALE_DIV+MALE_SINGLE+MALE_MAR_or_WID+
`CO-APPLICANT`+GUARANTOR+PRESENT_RESIDENT+REAL_ESTATE+PROP_UNKN_NONE+AGE+OTHER_INSTALL+RENT+
OWN_RES+NUM_CREDITS+JOB+NUM_DEPENDENTS+TELEPHONE+FOREIGN,
cureform=~CHK_ACCT+HISTORY+NEW_CAR+USED_CAR+FURNITURE+`RADIO/TV`+EDUCATION+RETRAINING+AMOUNT+SAV_ACCT+
EMPLOYMENT+INSTALL_RATE+MALE_DIV+MALE_SINGLE+MALE_MAR_or_WID+`CO-APPLICANT`+GUARANTOR+PRESENT_RESIDENT+
REAL_ESTATE+PROP_UNKN_NONE+AGE+OTHER_INSTALL+RENT+OWN_RES+NUM_CREDITS+JOB+NUM_DEPENDENTS+
TELEPHONE+FOREIGN,
model="ph", data = CD)
Error in while (convergence > eps & i < emmax) { :
missing value where TRUE/FALSE needed
Does anyone know what this error may mean?
Attached I have a subset of the data I used.
Data
structure(list(CHK_ACCT = c(0, 1, 3, 0, 0, 3, 3, 1, 3, 1, 1,
0, 1, 0, 0, 0, 3, 0, 1, 3, 3, 0, 0, 1, 3, 0, 3, 2, 1, 0, 1, 0,
1, 3, 2, 1, 3, 2, 2, 1, 3, 1, 1, 0, 0, 3, 3, 0, 3, 3, 1, 1, 3,
3, 1, 3, 1, 3, 2, 0, 1, 1, 1, 1, 3, 3, 3, 1, 3, 3, 3, 3, 0, 1,
0, 0, 0, 1, 3, 1, 3, 3, 3, 0, 0, 3, 1, 1, 0, 0, 3, 0, 3, 2, 1,
1, 3, 1, 1, 1, 3, 1, 3, 1, 3, 1, 3, 1, 0, 1, 1, 2, 1, 3, 0, 3,
0, 0, 0, 1, 0, 3, 3, 2, 1, 0, 0, 1, 1, 0, 1, 0, 3, 3, 3, 3, 3,
1, 1, 2, 2, 1, 0, 0, 3, 1, 0, 3, 0, 3, 3, 3, 2, 1, 1, 0, 0, 0,
1, 3, 3, 3, 3, 1, 3, 3, 0, 1, 3, 1, 0, 3, 1, 1, 0, 3, 0, 0, 3,
0, 3, 1, 0, 3, 1, 3, 1, 1, 0, 1, 3, 1, 1, 3, 1, 1, 3, 1, 1, 1
), DURATION = c(6, 48, 12, 42, 24, 36, 24, 36, 12, 30, 12, 48,
12, 24, 15, 24, 24, 30, 24, 24, 9, 6, 10, 12, 10, 6, 6, 12, 7,
60, 18, 24, 18, 12, 12, 45, 48, 18, 10, 9, 30, 12, 18, 30, 48,
11, 36, 6, 11, 12, 24, 27, 12, 18, 36, 6, 12, 36, 18, 36, 9,
15, 36, 48, 24, 27, 12, 12, 36, 36, 36, 7, 8, 42, 36, 12, 42,
11, 54, 30, 24, 15, 18, 24, 10, 12, 18, 36, 18, 12, 12, 12, 12,
24, 12, 54, 12, 18, 36, 20, 24, 36, 6, 9, 12, 24, 18, 12, 24,
14, 6, 15, 18, 36, 12, 48, 42, 10, 33, 12, 21, 24, 12, 10, 18,
12, 12, 12, 12, 12, 48, 36, 15, 18, 60, 12, 27, 12, 15, 12, 6,
36, 27, 18, 21, 48, 6, 12, 36, 18, 6, 10, 36, 24, 24, 12, 9,
12, 24, 6, 24, 18, 15, 10, 36, 6, 18, 11, 24, 24, 15, 12, 24,
8, 21, 30, 12, 6, 12, 21, 36, 36, 21, 24, 18, 15, 9, 16, 12,
18, 24, 48, 27, 6, 45, 9, 6, 12, 24, 18), HISTORY = c(4, 2, 4,
2, 3, 2, 2, 2, 2, 4, 2, 2, 2, 4, 2, 2, 4, 0, 2, 2, 4, 2, 4, 4,
4, 2, 0, 1, 2, 3, 2, 2, 2, 4, 2, 4, 4, 2, 2, 2, 2, 2, 3, 4, 4,
4, 2, 2, 4, 2, 3, 3, 2, 2, 3, 1, 2, 4, 2, 4, 2, 4, 0, 0, 2, 2,
2, 2, 2, 2, 2, 4, 4, 4, 2, 4, 2, 3, 0, 2, 2, 2, 2, 2, 2, 4, 4,
2, 2, 0, 4, 4, 4, 4, 2, 0, 4, 2, 4, 3, 2, 2, 3, 4, 2, 4, 1, 2,
2, 2, 3, 2, 2, 4, 2, 4, 2, 4, 4, 4, 2, 4, 2, 4, 2, 4, 2, 2, 4,
4, 2, 3, 2, 2, 2, 4, 3, 2, 4, 2, 2, 2, 2, 2, 4, 1, 4, 4, 4, 4,
2, 2, 2, 4, 3, 2, 4, 1, 2, 4, 4, 4, 2, 2, 2, 2, 2, 2, 2, 4, 0,
2, 3, 2, 3, 1, 2, 4, 2, 4, 3, 3, 1, 4, 4, 4, 1, 4, 2, 0, 2, 0,
2, 2, 2, 4, 4, 2, 2, 3), NEW_CAR = c(0, 0, 0, 0, 1, 0, 0, 0,
0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0,
0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1,
1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0), USED_CAR = c(0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0), FURNITURE = c(0,
0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0,
0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1,
0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 1, 0, 1), `RADIO/TV` = c(1, 1, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0,
1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1,
0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0,
0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0,
0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1,
1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1,
1, 0, 1, 0, 0, 0), EDUCATION = c(0, 0, 1, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0), RETRAINING = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1,
0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0), AMOUNT = c(1169,
5951, 2096, 7882, 4870, 9055, 2835, 6948, 3059, 5234, 1295, 4308,
1567, 1199, 1403, 1282, 2424, 8072, 12579, 3430, 2134, 2647,
2241, 1804, 2069, 1374, 426, 409, 2415, 6836, 1913, 4020, 5866,
1264, 1474, 4746, 6110, 2100, 1225, 458, 2333, 1158, 6204, 6187,
6143, 1393, 2299, 1352, 7228, 2073, 2333, 5965, 1262, 3378, 2225,
783, 6468, 9566, 1961, 6229, 1391, 1537, 1953, 14421, 3181, 5190,
2171, 1007, 1819, 2394, 8133, 730, 1164, 5954, 1977, 1526, 3965,
4771, 9436, 3832, 5943, 1213, 1568, 1755, 2315, 1412, 1295, 12612,
2249, 1108, 618, 1409, 797, 3617, 1318, 15945, 2012, 2622, 2337,
7057, 1469, 2323, 932, 1919, 2445, 11938, 6458, 6078, 7721, 1410,
1449, 392, 6260, 7855, 1680, 3578, 7174, 2132, 4281, 2366, 1835,
3868, 1768, 781, 1924, 2121, 701, 639, 1860, 3499, 8487, 6887,
2708, 1984, 10144, 1240, 8613, 766, 2728, 1881, 709, 4795, 3416,
2462, 2288, 3566, 860, 682, 5371, 1582, 1346, 1924, 5848, 7758,
6967, 1282, 1288, 339, 3512, 1898, 2872, 1055, 1262, 7308, 909,
2978, 1131, 1577, 3972, 1935, 950, 763, 2064, 1414, 3414, 7485,
2577, 338, 1963, 571, 9572, 4455, 1647, 3777, 884, 1360, 5129,
1175, 674, 3244, 4591, 3844, 3915, 2108, 3031, 1501, 1382, 951,
2760, 4297), SAV_ACCT = c(4, 0, 0, 0, 0, 4, 2, 0, 3, 0, 0, 0,
0, 0, 0, 1, 4, 4, 0, 2, 0, 2, 0, 1, 4, 0, 0, 3, 0, 0, 3, 0, 1,
4, 0, 0, 0, 0, 0, 0, 2, 2, 0, 1, 0, 0, 2, 2, 0, 1, 4, 0, 0, 4,
0, 4, 4, 0, 0, 0, 0, 4, 0, 0, 0, 4, 0, 3, 0, 4, 0, 4, 0, 0, 4,
0, 0, 0, 4, 0, 4, 2, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 4, 4, 3, 0,
4, 1, 0, 4, 1, 0, 0, 0, 4, 0, 0, 0, 4, 2, 1, 0, 0, 0, 2, 4, 4,
4, 2, 2, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 4, 0, 0, 0, 1, 4, 3, 2,
4, 0, 3, 0, 0, 0, 0, 1, 0, 1, 0, 3, 1, 0, 0, 3, 1, 0, 1, 0, 1,
4, 1, 0, 2, 0, 2, 2, 0, 3, 0, 0, 0, 0, 0, 0, 0, 4, 0, 2, 0, 0,
0, 0, 4, 3, 0, 0, 0, 0, 1, 0, 3, 1, 0, 0, 1, 0, 0, 1, 4, 0),
EMPLOYMENT = c(4, 2, 3, 3, 2, 2, 4, 2, 3, 0, 1, 1, 2, 4,
2, 2, 4, 1, 4, 4, 2, 2, 1, 1, 2, 2, 4, 2, 2, 4, 1, 2, 2,
4, 1, 1, 2, 2, 2, 2, 4, 2, 2, 3, 4, 1, 4, 0, 2, 2, 1, 4,
2, 2, 4, 2, 0, 2, 4, 1, 2, 4, 4, 2, 1, 4, 1, 2, 2, 2, 2,
4, 4, 3, 4, 4, 1, 3, 2, 1, 1, 4, 2, 4, 4, 2, 1, 2, 3, 3,
4, 4, 4, 4, 4, 1, 3, 2, 4, 3, 4, 3, 2, 3, 1, 2, 4, 3, 1,
4, 4, 1, 3, 2, 4, 4, 3, 1, 2, 3, 2, 4, 2, 4, 1, 2, 2, 2,
0, 2, 3, 2, 1, 2, 3, 4, 2, 2, 3, 2, 1, 1, 2, 2, 1, 3, 4,
3, 2, 4, 4, 2, 2, 4, 3, 2, 4, 4, 3, 2, 4, 1, 3, 0, 4, 2,
0, 1, 3, 4, 4, 2, 0, 2, 1, 0, 2, 4, 3, 4, 1, 2, 2, 2, 4,
2, 4, 0, 3, 2, 2, 3, 2, 3, 2, 4, 2, 1, 4, 4), INSTALL_RATE = c(4,
2, 2, 2, 3, 2, 3, 2, 2, 4, 3, 3, 1, 4, 2, 4, 4, 2, 4, 3,
4, 2, 1, 3, 2, 1, 4, 3, 3, 3, 3, 2, 2, 4, 4, 4, 1, 4, 2,
4, 4, 3, 2, 1, 4, 4, 4, 1, 1, 4, 4, 1, 3, 2, 4, 1, 2, 2,
3, 4, 2, 4, 4, 2, 4, 4, 2, 4, 4, 4, 1, 4, 3, 2, 4, 4, 4,
2, 2, 2, 1, 4, 3, 4, 3, 4, 4, 1, 4, 4, 4, 4, 4, 4, 4, 3,
4, 4, 4, 3, 4, 4, 3, 4, 2, 2, 2, 2, 1, 1, 1, 4, 3, 4, 3,
4, 4, 2, 1, 3, 3, 4, 3, 4, 4, 4, 4, 4, 4, 3, 1, 4, 2, 4,
2, 4, 2, 4, 4, 2, 2, 4, 3, 2, 4, 4, 1, 4, 3, 4, 2, 1, 4,
2, 4, 2, 3, 4, 2, 1, 3, 4, 4, 2, 4, 1, 4, 4, 2, 4, 4, 4,
3, 4, 2, 4, 2, 4, 4, 4, 1, 2, 4, 4, 4, 4, 2, 2, 4, 1, 2,
4, 4, 2, 4, 2, 1, 4, 4, 4), MALE_DIV = c(0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1), MALE_SINGLE = c(1, 0, 1, 1, 1, 1, 1, 1, 0, 0,
0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 0, 1,
1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0,
1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0,
0, 1, 0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0,
0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 0,
1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1,
0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1,
1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1, 1, 0,
1, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0,
0, 1, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0),
MALE_MAR_or_WID = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0,
0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0), `CO-APPLICANT` = c(0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0), GUARANTOR = c(0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0), PRESENT_RESIDENT = c(4, 2, 3, 4, 4, 4, 4,
2, 4, 2, 1, 4, 1, 4, 4, 2, 4, 3, 2, 2, 4, 3, 3, 4, 1, 2,
4, 3, 2, 4, 3, 2, 2, 4, 1, 2, 3, 2, 2, 3, 2, 1, 4, 4, 4,
4, 4, 2, 4, 2, 2, 2, 2, 1, 4, 2, 1, 2, 2, 4, 1, 4, 4, 2,
4, 4, 2, 1, 4, 4, 2, 2, 4, 1, 4, 4, 3, 4, 2, 1, 1, 3, 4,
4, 4, 2, 1, 4, 3, 3, 4, 3, 3, 4, 4, 4, 2, 4, 4, 4, 4, 4,
2, 3, 4, 3, 4, 2, 2, 2, 2, 4, 3, 2, 1, 1, 3, 3, 4, 3, 2,
2, 2, 4, 3, 2, 2, 2, 2, 2, 2, 3, 3, 4, 4, 2, 2, 3, 2, 2,
2, 1, 2, 2, 4, 2, 4, 3, 2, 4, 4, 4, 1, 4, 4, 4, 4, 1, 3,
2, 4, 1, 3, 4, 4, 2, 2, 1, 4, 4, 3, 1, 2, 2, 1, 1, 1, 4,
2, 4, 1, 2, 2, 4, 4, 2, 4, 3, 1, 4, 3, 4, 2, 2, 4, 3, 1,
4, 4, 3), REAL_ESTATE = c(1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0,
0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0,
0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1,
0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0,
0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0), PROP_UNKN_NONE = c(0,
0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0,
0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 1, 1), AGE = c(67, 22, 49, 45, 53, 35,
53, 35, 61, 28, 25, 24, 22, 60, 28, 32, 53, 25, 44, 31, 48,
44, 48, 44, 26, 36, 39, 42, 34, 63, 36, 27, 30, 57, 33, 25,
31, 37, 37, 24, 30, 26, 44, 24, 58, 35, 39, 23, 39, 28, 29,
30, 25, 31, 57, 26, 52, 31, 23, 23, 27, 50, 61, 25, 26, 48,
29, 22, 37, 25, 30, 46, 51, 41, 40, 66, 34, 51, 39, 22, 44,
47, 24, 58, 52, 29, 27, 47, 30, 28, 56, 54, 33, 20, 54, 58,
61, 34, 36, 36, 41, 24, 24, 35, 26, 39, 39, 32, 30, 35, 31,
23, 28, 25, 35, 47, 30, 27, 23, 36, 25, 41, 24, 63, 27, 30,
40, 30, 34, 29, 24, 29, 27, 47, 21, 38, 27, 66, 35, 44, 27,
30, 27, 22, 23, 30, 39, 51, 28, 46, 42, 38, 24, 29, 36, 20,
48, 45, 38, 34, 36, 30, 36, 70, 36, 32, 33, 20, 25, 31, 33,
26, 34, 33, 26, 53, 42, 52, 31, 65, 28, 30, 40, 50, 36, 31,
74, 68, 20, 33, 54, 34, 36, 29, 21, 34, 28, 27, 36, 40),
OTHER_INSTALL = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1,
0, 0, 1, 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1,
0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0,
1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0,
0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0,
1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0), RENT = c(0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0,
0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1,
0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0,
0, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 1, 1, 0, 0, 1, 0, 0), OWN_RES = c(1, 1, 1, 0, 0, 0,
1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1,
1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0,
0, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 1, 0,
1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 1, 1, 1, 1, 1,
0, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 0,
0, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1,
1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1,
0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 1,
1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 1,
1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1,
1, 0, 0, 1), NUM_CREDITS = c(2, 1, 1, 1, 2, 1, 1, 1, 1, 2,
1, 1, 1, 2, 1, 1, 2, 3, 1, 1, 3, 1, 2, 1, 2, 1, 1, 2, 1,
2, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1,
2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 4, 1,
1, 1, 1, 1, 2, 2, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2,
2, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1,
2, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 2, 1, 2, 2, 1, 2,
1, 2, 1, 1, 2, 2, 1, 1, 2, 2, 1, 2, 2, 1, 3, 1, 1, 1, 1,
1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 1, 2, 2, 1, 2,
2, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 1, 1, 2, 2, 2, 2,
2, 2, 1, 1, 2, 1, 3, 1, 2, 3, 1, 1, 1, 1, 2, 2, 4, 1, 1),
JOB = c(2, 2, 1, 2, 2, 1, 2, 3, 1, 3, 2, 2, 2, 1, 2, 1, 2,
2, 3, 2, 2, 2, 1, 2, 2, 1, 1, 2, 2, 2, 2, 2, 2, 1, 3, 1,
2, 2, 2, 2, 3, 2, 1, 2, 1, 3, 2, 0, 1, 2, 1, 3, 2, 2, 2,
1, 3, 2, 3, 1, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 1, 3, 1,
3, 3, 2, 2, 1, 2, 2, 2, 1, 1, 1, 3, 2, 2, 3, 2, 2, 2, 1,
2, 2, 2, 2, 2, 2, 3, 1, 2, 2, 2, 2, 3, 3, 2, 2, 2, 2, 2,
1, 2, 2, 2, 3, 2, 2, 3, 2, 3, 1, 2, 2, 2, 1, 2, 3, 2, 2,
2, 1, 2, 2, 2, 2, 1, 2, 1, 0, 3, 3, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 3, 2, 2, 1, 2, 1, 2, 2, 2, 3, 2, 2, 2, 2, 2,
2, 2, 2, 3, 2, 2, 3, 2, 2, 3, 2, 2, 3, 1, 2, 2, 2, 3, 0,
2, 2, 3, 1, 2, 2, 2, 3, 2, 2, 2, 3), NUM_DEPENDENTS = c(1,
1, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2,
1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1,
1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1,
1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 1, 1, 1,
1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 2, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1,
1, 1, 1, 2, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1,
1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1,
2, 2, 1, 1, 1, 1, 1, 1, 1), TELEPHONE = c(1, 0, 0, 0, 0,
1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0,
0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 1,
0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 1, 1,
1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1,
1, 0, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1,
0, 0, 0, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 0,
1, 1, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0,
1, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0,
0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0, 0, 1,
0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0,
1, 1, 0, 1, 1), FOREIGN = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0),
DEFAULT = c(0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0,
1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0,
0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0,
0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0,
0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0,
1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0,
1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1)), row.names = c(NA,
-200L), class = c("tbl_df", "tbl", "data.frame"))

y-axis label of highest value not printed

I want to plot the hourly visits to a certain webpage of my website. The x-axis shows the hours (0 to 23), the y-axis shows the number of unique visits.
I'm supressing axes in plot() and adding them with axis(). I want only the lowest and highest y-values labelled:
axis(2,
at = seq(min(...), max(...), 1),
labels = c(min(...),
rep.int("", max(...) - min(...) - 1),
max(...)
)
)
(Ellipses in the code sample represend the column. I left this out for better visual clarity of the code structure.)
But in the plot, the label in the highest value does not appear:
Sometimes (depending on the range of values) I can get the highest value label to appear by changing rep.int("" ... to rep.int(" ", i.e., labelling the ticks with a space, but this doesn't work always.
Why does R not print the hightest label? And, more importantly:
How can I force R to print the highest label?
Complete code example:
sitzungen <- c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 0, 8, 4, 0, 8, 3, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 2, 0, 0, 2, 0, 0, 2, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 2, 0, 2, 2, 1, 0, 0, 0, 1, 0, 0, 1, 3, 0, 0, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 4, 1, 2, 1, 7, 7, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 2, 2, 2, 2, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 3, 8, 4, 1, 2, 0, 1, 1, 0, 0, 5, 0, 3, 3, 2, 3, 1, 2, 0, 1, 2, 0, 0, 0, 1, 0, 1, 2, 3, 0, 0, 3, 1, 6, 3, 9, 1, 0, 2, 1, 4, 8, 2, 2, 2, 0, 0, 0, 2, 1, 3, 1, 1, 2, 1, 2, 3, 1, 4, 3, 0, 2, 3, 1, 3, 1, 5, 2, 0, 0, 1, 0, 1, 2, 1, 0, 3, 0, 1, 0, 3, 7, 2, 2, 1, 2, 2, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 2, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 15, 2, 2, 1, 0, 0, 0, 0, 0, 2, 3, 0, 3, 0, 2, 1, 1, 2, 2, 4, 2, 1, 4, 2, 1, 2, 2, 1, 0, 0, 0, 7, 0, 2, 4, 2, 0, 2, 3, 5, 2, 1, 4, 4, 2, 0, 2, 4, 0, 0, 0, 0, 0, 0, 0, 1, 3, 0, 2, 1, 2, 1, 1, 2, 1, 4, 1, 1, 1, 0, 0, 3, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
stunde <- rep(0:23, 20)
stuendlich <- data.frame(cbind(stunde, sitzungen))
aggr <- aggregate(sitzungen ~ stunde, stuendlich, sum)
aggr <- rbind(aggr, c(24, aggr[which(aggr$stunde == "23"),]$sitzungen))
plot(aggr, type = "s", xlim = c(0, 24), axes = FALSE, xlab = "Stunde", ylab = "Sitzungen", main = "Sitzungen pro Stunde (kumuliert)")
axis(1, at = seq(0.5, 23.5, 1), labels = 0:23)
axis(2, at = seq(min(aggr$sitzungen), max(aggr$sitzungen), 1), labels = c(min(aggr$sitzungen), rep.int(" ", max(aggr$sitzungen) - min(aggr$sitzungen) - 1), max(aggr$sitzungen)))
Don't use " " or ""; use NA:
axis(2, at = seq(min(aggr$sitzungen), max(aggr$sitzungen), 1),
labels = c(min(aggr$sitzungen),
rep.int(NA, max(aggr$sitzungen) - min(aggr$sitzungen) - 1),
max(aggr$sitzungen)))

Unable to plot weekly data with ggplot2

I can plot Daily but Week yields
Error: geom_path: Each group consist of only one observation.
Do you need to adjust the group aesthetic? Yes.
With this type of data:
DailyDF2 <-
structure(list(Group.date = structure(c(15023, 15024, 15027,
15029, 15031, 15035, 15036, 15037, 15039, 15040, 15041, 15043,
15046, 15048, 15050, 15054, 15056, 15057, 15059, 15061, 15062,
15063, 15064, 15068, 15070, 15071, 15073, 15078, 15079, 15080,
15085, 15089, 15090, 15092, 15095, 15099, 15100, 15103, 15104,
15105, 15106, 15107, 15109, 15110, 15111, 15112, 15113, 15120,
15121, 15122, 15124, 15127, 15128, 15132, 15133, 15134, 15141,
15142, 15146, 15148, 15153, 15155, 15156, 15161, 15162, 15169,
15173, 15174, 15177, 15180, 15181, 15182, 15183, 15186, 15187,
15188, 15190, 15195, 15196, 15197, 15198, 15199, 15201, 15202,
15203, 15204, 15205, 15206, 15207, 15208, 15209, 15211, 15212,
15213, 15214, 15215, 15216, 15218, 15219, 15220, 15223, 15224,
15225, 15226, 15227, 15228, 15229, 15230, 15231, 15232, 15233,
15235, 15236, 15237, 15239, 15241, 15243, 15244, 15245, 15246,
15247, 15248, 15249, 15250, 15251, 15252, 15253, 15254, 15255,
15257, 15258, 15259, 15260, 15261, 15262, 15263, 15264, 15265,
15266, 15267, 15268, 15269, 15271, 15274, 15275, 15276, 15278,
15279, 15280, 15281, 15282, 15283, 15284, 15285, 15286, 15287,
15288, 15289, 15290, 15291, 15292, 15293, 15294, 15295, 15296,
15297, 15298, 15299, 15300, 15301, 15302, 15303, 15304, 15305,
15306, 15307, 15308, 15309, 15310, 15311, 15313, 15314, 15315,
15316, 15317, 15318, 15320, 15321, 15322, 15323, 15325, 15327,
15328, 15329, 15330, 15331, 15332, 15333, 15334, 15335, 15336,
15337, 15338, 15342, 15343, 15344, 15345, 15346, 15347, 15348,
15350, 15351, 15352, 15353, 15354, 15356, 15357, 15358, 15359,
15361, 15362, 15363, 15364, 15365, 15367, 15368, 15369, 15370,
15372, 15373, 15374, 15375, 15376, 15377, 15378, 15379, 15380,
15381, 15382, 15383, 15384, 15385, 15386, 15387, 15389, 15390,
15391, 15392, 15393, 15394, 15398, 15399, 15400, 15401, 15403,
15404, 15405, 15406, 15407, 15408, 15409, 15410, 15411, 15412,
15413, 15414, 15415, 15416, 15417, 15418, 15419, 15420, 15421,
15422, 15423, 15424, 15425, 15428, 15429, 15430, 15433, 15434,
15435, 15437, 15438, 15439, 15440, 15441, 15442, 15443, 15444,
15446, 15447, 15448, 15449, 15450, 15451, 15454, 15455, 15456,
15457, 15459, 15460, 15462, 15463, 15464, 15465, 15466, 15467,
15468, 15469, 15470, 15471, 15474, 15475, 15476, 15477, 15478,
15481, 15482, 15483, 15484, 15485, 15488, 15489, 15490, 15491,
15492, 15495, 15496, 15497, 15498, 15500, 15501, 15502, 15503,
15504, 15505, 15506, 15507, 15508, 15509, 15510, 15511, 15512,
15514, 15515, 15516, 15518, 15519, 15520, 15522, 15525, 15526,
15527, 15528, 15529, 15530, 15531, 15532, 15533, 15534, 15536,
15537, 15539, 15540, 15541, 15542, 15544, 15545, 15546, 15547,
15548, 15549, 15550, 15551, 15552, 15553, 15554, 15555, 15558,
15559, 15560, 15561, 15562, 15563, 15565, 15566, 15568, 15569,
15572, 15573, 15574, 15575, 15576, 15578, 15579, 15580, 15581,
15582, 15583, 15584, 15587, 15588, 15589, 15590, 15591, 15593,
15594, 15595, 15596, 15597, 15600, 15602, 15603, 15604, 15605,
15606, 15607, 15609, 15610, 15611, 15612, 15614, 15615, 15616,
15617, 15618, 15621, 15622, 15623, 15624, 15625, 15626, 15628,
15629, 15630, 15631, 15632, 15633, 15634, 15636, 15637, 15638,
15639, 15641, 15642, 15643, 15644, 15645, 15646, 15647, 15649,
15650, 15651, 15652, 15654, 15655, 15656, 15657, 15658, 15659,
15660, 15661, 15662, 15663, 15664, 15665, 15666, 15667, 15670,
15672, 15673, 15674, 15675, 15676, 15677, 15678, 15679, 15680,
15681, 15682, 15684, 15685, 15686, 15687, 15688, 15689, 15690,
15693, 15694, 15695, 15696, 15699, 15700, 15701, 15702, 15703,
15708, 15709, 15712, 15713, 15715, 15716, 15717, 15719, 15720,
15722, 15723, 15724, 15726, 15727, 15728, 15730, 15731, 15733,
15734, 15735, 15736, 15737, 15738, 15739, 15740, 15741, 15742,
15743, 15744, 15745, 15746, 15747, 15748, 15749, 15750, 15751,
15752, 15753, 15754, 15755, 15756, 15757, 15758, 15759, 15760,
15761, 15762), class = "Date"), X.hpm = c(4, 5, 3, 1, 3, 1, 2,
1, 2, 3, 1, 4, 1, 1, 14, 1, 1, 5, 1, 1, 1, 1, 5, 2, 2, 9, 0,
5, 1, 1, 1, 3, 1, 8, 1, 6, 5, 1, 2, 2, 3, 4, 1, 2, 2, 4, 4, 3,
1, 1, 1, 11, 2, 1, 5, 4, 5, 1, 1, 3, 1, 2, 1, 1, 4, 6, 1, 0,
0, 0, 0, 0, 2, 0, 0, 0, 3, 0, 0, 3, 2, 0, 0, 0, 1, 4, 1, 0, 1,
0, 1, 2, 1, 1, 0, 0, 0, 27, 5, 2, 1, 0, 13, 1, 0, 0, 1, 0, 2,
3, 0, 0, 0, 0, 1, 0, 1, 0, 0, 2, 0, 1, 1, 3, 0, 0, 1, 3, 0, 0,
1, 0, 15, 1, 0, 0, 1, 0, 4, 16, 0, 0, 4, 3, 3, 0, 0, 1, 1, 2,
2, 0, 2, 1, 2, 0, 1, 4, 0, 4, 0, 3, 3, 14, 7, 2, 2, 2, 0, 6,
5, 0, 0, 0, 1, 3, 1, 2, 0, 1, 0, 1, 1, 5, 1, 1, 0, 1, 0, 0, 0,
0, 0, 1, 4, 0, 0, 0, 1, 2, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 5,
2, 1, 0, 3, 1, 6, 3, 0, 1, 0, 2, 1, 0, 3, 0, 0, 0, 1, 0, 0, 1,
0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 2, 1, 0, 1, 0, 1, 1,
1, 0, 2, 3, 3, 0, 15, 0, 1, 3, 1, 1, 3, 5, 4, 0, 4, 4, 5, 4,
1, 0, 0, 3, 2, 0, 0, 0, 2, 0, 1, 2, 6, 0, 0, 5, 0, 0, 0, 0, 2,
0, 1, 0, 1, 3, 0, 3, 0, 4, 0, 1, 0, 1, 2, 3, 3, 4, 0, 5, 3, 3,
1, 3, 1, 0, 1, 36, 2, 0, 1, 1, 10, 1, 2, 1, 3, 0, 0, 0, 1, 0,
2, 9, 1, 0, 0, 2, 0, 1, 34, 0, 1, 0, 2, 1, 0, 0, 0, 0, 0, 2,
0, 5, 2, 4, 22, 1, 0, 1, 0, 2, 0, 1, 0, 0, 0, 3, 4, 0, 1, 1,
2, 1, 6, 1, 0, 0, 0, 0, 5, 1, 0, 8, 1, 2, 0, 2, 1, 56, 1, 2,
0, 3, 6, 10, 0, 2, 0, 0, 4, 6, 4, 0, 1, 8, 2, 2, 1, 0, 7, 3,
1, 0, 2, 1, 2, 1, 1, 2, 1, 5, 1, 3, 1, 2, 1, 5, 2, 0, 1, 2, 1,
32, 0, 0, 2, 0, 1, 17, 3, 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 0, 1,
0, 1, 0, 2, 3, 4, 0, 2, 1, 4, 3, 0, 0, 0, 2, 5, 0, 0, 1, 2, 1,
2, 1, 1, 0, 1, 1, 0, 6, 0, 2, 1, 0, 0, 1, 0, 0, 3, 2, 0, 0, 6,
1, 0, 1, 13, 0, 0, 0, 1, 24, 4, 1, 0, 4, 3, 1, 1, 1, 0, 2, 3,
0, 3, 0, 2, 0, 1, 4, 0, 1, 0, 6, 1, 5, 9, 4, 0, 0, 0, 0, 1, 2,
0, 0, 0, 0, 0), X.hospice = c(2, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0,
2, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3,
1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 2, 3, 1, 0, 0, 0, 0, 0, 0,
1, 2, 0, 0, 1, 0, 0, 0, 2, 1, 1, 0, 0, 0, 2, 2, 3, 2, 2, 2, 0,
2, 2, 3, 2, 7, 3, 3, 2, 2, 3, 6, 2, 3, 1, 1, 2, 1, 0, 0, 1, 1,
2, 0, 10, 0, 0, 3, 3, 12, 2, 0, 1, 1, 3, 0, 0, 1, 1, 0, 1, 0,
1, 2, 6, 3, 3, 2, 0, 0, 5, 3, 0, 3, 1, 1, 0, 0, 0, 0, 0, 0, 1,
2, 2, 4, 0, 0, 1, 2, 1, 2, 1, 2, 0, 5, 5, 0, 0, 1, 2, 0, 0, 0,
6, 1, 0, 2, 0, 0, 3, 4, 1, 0, 1, 2, 0, 2, 1, 2, 1, 0, 5, 1, 0,
1, 0, 2, 3, 1, 1, 1, 0, 3, 3, 2, 4, 1, 2, 1, 1, 2, 3, 2, 1, 2,
1, 1, 0, 2, 0, 6, 3, 1, 2, 2, 0, 1, 1, 2, 0, 1, 2, 0, 1, 1, 1,
0, 1, 3, 6, 0, 0, 1, 2, 3, 0, 1, 1, 2, 6, 1, 2, 1, 0, 2, 4, 1,
1, 5, 1, 0, 2, 1, 1, 1, 1, 0, 2, 2, 0, 0, 4, 4, 1, 1, 3, 1, 0,
0, 1, 0, 3, 5, 0, 2, 3, 3, 10, 2, 4, 0, 1, 3, 0, 0, 0, 2, 4,
3, 0, 0, 0, 0, 1, 0, 3, 2, 1, 2, 0, 0, 1, 0, 0, 1, 1, 1, 0, 3,
1, 4, 0, 1, 2, 0, 4, 0, 1, 1, 9, 3, 3, 2, 2, 0, 1, 1, 0, 3, 1,
5, 1, 1, 0, 2, 2, 1, 3, 2, 3, 3, 1, 1, 3, 2, 1, 1, 0, 1, 0, 0,
1, 0, 0, 0, 1, 1, 1, 1, 2, 0, 1, 2, 3, 1, 0, 0, 0, 1, 3, 1, 0,
1, 1, 2, 0, 2, 0, 0, 1, 0, 0, 1, 1, 4, 0, 2, 1, 3, 1, 2, 2, 0,
6, 2, 1, 1, 2, 4, 2, 1, 0, 2, 1, 2, 1, 0, 0, 2, 4, 0, 2, 0, 2,
3, 2, 2, 0, 1, 2, 10, 5, 0, 0, 2, 1, 2, 2, 0, 2, 2, 1, 0, 1,
1, 1, 4, 5, 3, 0, 0, 1, 1, 2, 2, 0, 0, 0, 1, 1, 2, 2, 1, 1, 1,
1, 1, 0, 1, 3, 1, 1, 0, 1, 0, 2, 1, 2, 5, 0, 0, 3, 6, 7, 1, 1,
4, 4, 2, 2, 0, 1, 4, 1, 4, 0, 0, 1, 0, 1, 1, 2, 1, 1, 0, 1, 0,
1, 1, 1, 0, 0, 1, 0, 0, 2, 1, 2, 2, 2, 1, 2, 2, 5, 1, 0, 1, 1,
0, 3, 0, 1, 4, 3, 0, 2, 0, 2, 4, 6, 1, 2, 1, 1, 1, 2, 3, 1, 2,
6, 3, 0, 0, 7, 6, 2, 1, 2, 1, 1, 19), X.palliative = c(1, 0,
3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 2, 1, 2,
1, 0, 1, 1, 0, 0, 0, 0, 2, 1, 3, 4, 0, 1, 1, 1, 1, 1, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 6, 0, 0, 1, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 2, 3, 0, 0, 0, 6, 0, 1, 0, 0,
0, 2, 1, 0, 0, 1, 1, 0, 1, 0, 3, 2, 1, 1, 0, 0, 0, 2, 1, 2, 7,
0, 1, 1, 2, 0, 0, 2, 1, 3, 1, 0, 0, 2, 0, 7, 0, 4, 0, 1, 0, 0,
1, 1, 1, 0, 0, 1, 3, 1, 6, 0, 4, 0, 2, 2, 8, 3, 1, 1, 1, 0, 3,
0, 0, 0, 0, 0, 1, 2, 0, 5, 0, 0, 1, 1, 0, 1, 1, 0, 0, 2, 4, 0,
0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 1, 4, 1, 0, 0, 0, 0, 0, 0,
1, 1, 0, 0, 0, 0, 0, 0, 2, 0, 2, 0, 0, 3, 1, 0, 0, 0, 0, 0, 0,
0, 2, 0, 0, 1, 0, 0, 0, 0, 2, 0, 1, 0, 1, 0, 1, 1, 3, 0, 0, 2,
0, 0, 2, 2, 0, 1, 3, 1, 1, 1, 0, 0, 3, 4, 4, 3, 4, 1, 6, 1, 0,
0, 0, 2, 2, 2, 0, 0, 0, 1, 1, 1, 0, 0, 4, 3, 1, 2, 0, 0, 3, 0,
2, 2, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 2, 1, 0, 1, 0, 0,
0, 0, 0, 2, 4, 0, 3, 1, 0, 0, 0, 1, 1, 0, 2, 0, 0, 0, 1, 0, 0,
1, 0, 0, 0, 2, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 5, 0, 4, 2,
2, 1, 1, 0, 0, 2, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 1, 0, 0, 1, 0, 0, 8, 0, 0, 2, 4, 2, 0, 0, 3, 0, 7, 9, 12,
0, 2, 0, 0, 0, 0, 0, 1, 0, 7, 7, 1, 2, 6, 2, 2, 0, 2, 1, 1, 0,
0, 0, 0, 0, 3, 1, 2, 0, 2, 2, 3, 2, 1, 0, 0, 1, 1, 0, 4, 0, 1,
0, 0, 0, 2, 0, 1, 4, 1, 1, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 1, 1,
0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 3, 0, 0, 0, 2, 0, 0, 1,
1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, 1, 0, 1,
0, 1, 3, 3, 0, 0, 4, 2, 1, 0, 1, 2, 4, 2, 1, 0, 0, 3, 1, 1, 0,
1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 2, 2, 3, 1, 0, 4, 0), X.pedpc = c(0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 4, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 1, 0, 0, 0, 8, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 7, 1, 1, 1, 0,
4, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 2, 2, 2, 0, 1, 1, 0, 0, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 1, 2, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0,
1, 1, 1, 0, 3, 1, 1, 3, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 1, 0, 0, 6, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 1, 2, 2, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
2, 2, 2, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 2, 1, 2,
0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0,
1, 0, 0, 1, 1, 0, 1, 1, 2, 0, 2, 2, 0, 1, 0, 1, 2, 0, 0, 2, 0,
0, 0, 0, 0, 0, 0, 4, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 2, 0, 0, 0, 1, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0), X.pediatric = c(1,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 5, 0, 0, 0, 1, 0, 1, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0,
3, 0, 1, 1, 2, 0, 0, 0, 2, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0,
0, 1, 1, 0, 0, 1, 0, 0, 1, 2, 0, 0, 0, 4, 2, 3, 2, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 1, 0, 0, 4, 0, 0, 0, 1, 0, 1, 1, 0, 0, 2, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 2, 2, 0, 0, 5, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0,
0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 4, 0, 3,
0, 2, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 2, 2, 2,
0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0,
0, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0,
1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1,
0, 0, 2, 1, 3, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 0, 0, 2, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 1, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0,
0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 6, 0, 2, 0, 0, 0, 0), HashTag = c(0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0)), .Names = c("Group.date",
"X.hpm", "X.hospice", "X.palliative", "X.pedpc", "X.pediatric",
"HashTag"), row.names = c(NA, -545L), class = "data.frame")
And by plotting with this code:
ggplot(DailyDF2, aes(Group.date)) +
geom_line(aes(y = HashTag, colour = "HashTag")) +
geom_line(aes(y = X.hpm, colour = "#hpm")) +
geom_line(aes(y = X.hospice, colour = "#hospice")) +
geom_line(aes(y = X.palliative, colour="#palliative")) +
geom_line(aes(y = X.pedpc, colour = "#pedpc")) +
geom_line(aes(y = X.pediatric, colour="#pediatric")) +
ylab(label="Top 5 Hash Tags Frequency") +
xlab("Day")+
theme(axis.text.x=element_text(angle=-45, hjust=0.001))
I get this:
When I use my weekly data:
WeeklyDF2 <-
structure(list(Group.date = c("2011-07", "2011-08", "2011-09",
"2011-10", "2011-11", "2011-12", "2011-13", "2011-14", "2011-15",
"2011-16", "2011-17", "2011-18", "2011-19", "2011-20", "2011-21",
"2011-22", "2011-23", "2011-24", "2011-25", "2011-26", "2011-27",
"2011-28", "2011-29", "2011-30", "2011-31", "2011-32", "2011-33",
"2011-34", "2011-35", "2011-36", "2011-37", "2011-38", "2011-39",
"2011-40", "2011-41", "2011-42", "2011-43", "2011-44", "2011-45",
"2011-46", "2011-47", "2011-48", "2011-49", "2011-50", "2011-51",
"2011-52", "2012-01", "2012-02", "2012-03", "2012-04", "2012-05",
"2012-06", "2012-07", "2012-08", "2012-09", "2012-10", "2012-11",
"2012-12", "2012-13", "2012-14", "2012-15", "2012-16", "2012-17",
"2012-18", "2012-19", "2012-20", "2012-21", "2012-22", "2012-23",
"2012-24", "2012-25", "2012-26", "2012-27", "2012-28", "2012-29",
"2012-30", "2012-31", "2012-32", "2012-33", "2012-34", "2012-35",
"2012-36", "2012-37", "2012-38", "2012-39", "2012-40", "2012-41",
"2012-42", "2012-43", "2012-44", "2012-45", "2012-46", "2012-47",
"2012-48", "2012-49", "2012-50", "2012-51", "2012-52", "2013-00",
"2013-01", "2013-02", "2013-03", "2013-04", "2013-05", "2013-06",
"2013-07", "2013-08"), X.hpm = c(9, 7, 4, 10, 16, 8, 8, 13, 7,
1, 12, 12, 12, 13, 5, 14, 10, 6, 4, 4, 5, 6, 1, 2, 3, 5, 6, 6,
34, 15, 6, 1, 4, 8, 17, 21, 10, 6, 10, 33, 15, 8, 9, 1, 5, 4,
1, 9, 13, 4, 4, 3, 0, 5, 3, 24, 14, 22, 5, 2, 14, 3, 4, 8, 13,
15, 40, 13, 6, 13, 37, 4, 2, 34, 4, 7, 12, 6, 11, 60, 23, 14,
13, 12, 7, 12, 11, 36, 23, 5, 2, 10, 10, 7, 8, 10, 2, 5, 7, 14,
30, 9, 9, 8, 25, 3, 0), X.hospice = c(2, 0, 0, 4, 2, 1, 0, 0,
0, 0, 4, 0, 3, 7, 0, 0, 3, 1, 0, 3, 1, 0, 4, 9, 7, 17, 17, 5,
13, 20, 6, 3, 16, 13, 0, 10, 6, 12, 10, 10, 8, 8, 8, 13, 11,
7, 12, 6, 5, 11, 7, 13, 14, 6, 4, 14, 9, 24, 4, 9, 6, 4, 3, 9,
8, 19, 5, 8, 10, 14, 3, 2, 5, 6, 7, 5, 6, 11, 9, 10, 6, 8, 9,
18, 7, 6, 14, 6, 4, 7, 6, 11, 18, 12, 11, 6, 3, 2, 2, 8, 10,
5, 10, 17, 18, 18, 21), X.palliative = c(1, 3, 0, 0, 1, 0, 0,
1, 0, 0, 0, 0, 5, 5, 1, 2, 8, 1, 2, 2, 1, 0, 0, 0, 1, 7, 2, 0,
7, 7, 3, 3, 7, 12, 6, 7, 11, 4, 11, 20, 5, 8, 4, 6, 1, 2, 6,
2, 0, 4, 4, 3, 2, 4, 5, 8, 10, 19, 6, 1, 10, 7, 2, 2, 6, 1, 6,
4, 4, 2, 3, 1, 6, 10, 3, 1, 1, 2, 8, 8, 33, 0, 16, 12, 4, 6,
10, 6, 1, 9, 2, 2, 2, 3, 5, 2, 2, 3, 0, 2, 7, 7, 10, 7, 0, 11,
4), X.pedpc = c(0, 0, 0, 0, 0, 0, 0, 0, 5, 1, 0, 2, 1, 0, 0,
1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 9, 0, 0, 0, 0, 1, 1,
0, 0, 0, 11, 6, 4, 8, 0, 1, 5, 2, 3, 8, 1, 0, 4, 0, 0, 1, 7,
1, 2, 0, 0, 1, 0, 0, 0, 3, 0, 5, 2, 0, 1, 0, 0, 0, 7, 1, 1, 3,
0, 2, 0, 6, 2, 0, 2, 2, 3, 7, 4, 2, 6, 0, 1, 3, 1, 4, 0, 1, 0,
0, 0, 0, 2, 1, 0, 1, 1, 0), X.pediatric = c(1, 0, 0, 0, 0, 0,
0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 6, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 2, 1, 3, 4, 3, 1, 3, 4, 11, 0, 5, 3, 2, 0, 2, 0,
0, 0, 0, 0, 1, 0, 1, 0, 1, 4, 9, 0, 1, 2, 0, 1, 1, 0, 0, 0, 1,
0, 0, 0, 0, 5, 5, 3, 0, 0, 1, 1, 1, 7, 0, 3, 1, 0, 4, 3, 0, 1,
2, 0, 1, 6, 1, 4, 0, 0, 4, 0, 1, 1, 2, 0, 1, 1, 8, 0), HashTag = c(0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0)), .Names = c("Group.date", "X.hpm", "X.hospice", "X.palliative",
"X.pedpc", "X.pediatric", "HashTag"), row.names = c(NA, -107L
), class = "data.frame")
And when I plot with a similar code:
ggplot(WeeklyDF2, aes(Group.date))+
geom_line(aes(y = HashTag, colour = "HashTag")) +
geom_line(aes(y = X.hpm, colour = "#hpm")) +
geom_line(aes(y = X.hospice, colour = "#hospice")) +
geom_line(aes(y = X.palliative, colour="#palliative")) +
geom_line(aes(y = X.pedpc, colour = "#pedpc")) +
geom_line(aes(y = X.pediatric, colour="#pediatric")) +
ylab(label="Top 5 Hash Tags Frequency") +
xlab("Week")+
theme(axis.text.x=element_text(angle=-45, hjust=0.001))
I get the following warnings:
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
geom_path: Each group consist of only one observation. Do you need to adjust the group aesthetic?
And my plot looks like this:
Any ideas?
UPDATE My WeeklyDF2$Group.date is a character vector. My DailyDF2$Group.date is a "double". Should WeeklyDF2$Group.date <- as.double.POSIXlt(WeeklyDF2$Group.date) or WeeklyDF2$Group.date <- as.double(WeeklyDF2$Group.date) fix the issue?
Ista was correct: WeeklyDF2$Group.date <- as.numeric(as.factor(WeeklyDF$Group.date))
Was what I need to do to correct the issue so plotting with :
ggplot(WeeklyDF2, aes(Group.date))+
geom_line(aes(y = HashTag, colour = "HashTag")) +
geom_line(aes(y = X.hpm, colour = "#hpm")) +
geom_line(aes(y = X.hospice, colour = "#hospice")) +
geom_line(aes(y = X.palliative, colour="#palliative")) +
geom_line(aes(y = X.pedpc, colour = "#pedpc")) +
geom_line(aes(y = X.pediatric, colour="#pediatric")) +
ylab(label="Top 5 Hash Tags Frequency") +
xlab("Week")+
theme(axis.text.x=element_text(angle=-45, hjust=0.001))
The solution yielded a sequence (1,2,3,4,5,6,7.......) but better than nothing.
It would be nice to know how to plot the variables by the proper week date format in R. Would any one know how to do so? I mean, would anyone know how to convert a excel date (MM/DD/YY) as well as the odd date format pulled from an api (18FEB2011:16:24:00.00) to a week date format for R?

How to plot a ternary graphic with different size point in ggtern?

I would like to make a ggtern graph that I could change the size of every point. My data has some patients which have only 1 of the 3 possible compositions. As a result, in a vertex, I have more than 1 patient information overlapped, and I don't want to jitter.
What I have so far:
library(compositions)
library(ggtern)
ds <- structure(list(`GC+` = c(1, 0, 9, 21, 2, 0, 0, 0, 4, 0, 0, 24,
0, 0, 1, 0, 0, 3, 3, 0, 5, 0, 0, 3, 0, 0, 0, 2, 11, 0, 0, 18,
13, 0, 6, 8, 0, 1, 0, 1, 23, 0, 1, 4, 5), `PC+` = c(5, 2, 8,
0, 6, 0, 0, 0, 10, 0, 0, 20, 0, 0, 2, 0, 0, 3, 3, 0, 0, 0, 10,
2, 0, 0, 0, 0, 10, 1, 0, 4, 8, 0, 1, 16, 1, 2, 0, 0, 18, 0, 0,
0, 1), `OT+` = c(0, 2, 7, 0, 0, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0,
0, 2, 5, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 12, 0, 0, 6, 3, 1, 0,
6, 0, 0, 0, 0, 3, 0, 0, 3, 0), size = c(1, 1, 1, 4, 1, 0, 0,
0, 1, 0, 3, 1, 0, 0, 1, 0, 3, 1, 1, 0, 4, 0, 1, 1, 0, 0, 0, 1,
1, 2, 0, 1, 1, 3, 1, 1, 2, 1, 0, 4, 1, 0, 4, 1, 1)), row.names = c(NA,
45L), class = "data.frame")
d.tern <- as.data.frame(acomp(ds))
size <- apply(d.tern, 2, function(x) {
sum(x==1)
})
ds$size <- ifelse(d.tern$`GC+` == 1, 4,
ifelse(d.tern$`PC+` == 1, 2,
ifelse(d.tern$`OT+` == 1, 3, 1)))
ds$size[is.na(ds$size)] <- 0
ggtern(data = ds, aes(`GC+`, `PC+`, `OT+`)) +
geom_mask() +
geom_point(fill="red", shape=21, size = 3) +
theme_bw() +
theme_showarrows() +
theme_clockwise() +
labs(x = "GC+", y = "PC+", z = "OT+",
title = "Composição dos Linfonodos Positivos")
I would like to pass size from ds to geom_point. But it doesn't work.
So here is a way how to count the samples per unique value:
tab <- as.data.frame(table(ds[,1:3]))
# Keep only observed samples
tab <- tab[tab$Freq > 0,]
# Fix colnames to contain plus
colnames(tab) <- gsub("\\.", "+", colnames(tab))
# For reasons I don't understand the columns were converted to factors
# so we'll fix them again as numeric
tab[, 1:3] <- lapply(tab[, 1:3], as.numeric)
And then the plotting would be as follows:
ggtern(data = tab, aes(`GC+`, `PC+`, `OT+`)) +
geom_mask() +
geom_point(aes(size = Freq), fill="red", shape=21) +
scale_size_continuous(range = c(3, 5), breaks = sort(unique(tab$Freq))) +
theme_bw() +
theme_showarrows() +
theme_clockwise() +
labs(x = "GC+", y = "PC+", z = "OT+",
title = "Composição dos Linfonodos Positivos")
You can play around with the scale_size_continuous() function untill you have sizes that satisfy you.

Resources