R/ReOrder.R

In rubystokes/ECPT_Package:

ReOrder <- function(x){
  x[,c("Img_N", "Experiment", "Img_Nuclei_N", "Cell_Type", "Treatment", "Replicate", "Well",
       "Cell_N", "Un_Cell_Id", "Nu_X", "Nu_Y","Cell_Act_Cl", "Cell_Orientation", "Cell_Area", "Cell_Perim", "Cell_MaxL", "Cell_MinL", "WLR", "Cell_Neighbour_N", "Cell_1st_Nb_Dist", "Cell_2nd_Nb_Dist", "Nu_Clustering", "Nu_1st_Nb_Dist", "Nu_2nd_Nb_Dist", "Nu_Area", "DNA_IntI_Norm", "Cell_Cycle",
       "Cell_VEC_Norm", "Junc_VEC_Norm", "JCyR", "J_N", "Perc_Stb", "Perc_Lin", "Perc_Jag", "STB_Index",
       "Cy_NCH_IntI", "Nu_NCH_IntI", "Tot_NCH", "Nu_NOTCH_Fraction")]
}