try pushing for once

yiqunchen · Nov 22, 2023 · 8a7c196 · 8a7c196
1 parent 3919088
commit 8a7c196
Show file tree

Hide file tree

Showing 2 changed files with 21 additions and 4 deletions.
diff --git a/.Rproj.user/shared/notebooks/paths b/.Rproj.user/shared/notebooks/paths
@@ -1,2 +1,18 @@
-/Users/tonyyiqunchen/Desktop/dissertation/single_feature_testing/CADET/NAMESPACE="31199EE7"
-/Users/tonyyiqunchen/Desktop/dissertation/single_feature_testing/CADET/R/hello.R="E1C9A45B"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/kmeans_inference.R="7476EB65"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/kmeans_inference_1f.R="52605B8F"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/trunc_dist.R="5D4241FB"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/trunc_inf.R="D59EB241"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/trunc_sets_1f.R="5F3E6292"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/trunc_sets_kmeans_1f.R="F1CFA239"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/trunc_sets_kmeans_1f_less_cond.R="E0AD3373"
+/Users/yiquntchen/Desktop/fall_2022/CADET/R/util.R="20EC09DD"
+/Users/yiquntchen/Desktop/fall_2022/gen_paper_figure_CADET/compare_old_and_new_pval.R="EB937DF2"
+/Users/yiquntchen/Desktop/fall_2022/gen_paper_figure_CADET/generate_figure_for_cadet.R="252C4754"
+/Users/yiquntchen/Desktop/fall_2022/gen_paper_figure_CADET/test_new_pval_power.R="226CF8D0"
+/Users/yiquntchen/Desktop/fall_2022/gen_paper_figure_CADET/test_new_pval_power_2.R="954EBA84"
+/Users/yiquntchen/Desktop/fall_2022/get_intuition_about_phi.R="ABD04DA0"
+/Users/yiquntchen/Desktop/test_cadet_new_function.R="EE2C8EDF"
+/Users/yiquntchen/Desktop/test_new_p_val_ver_1.R="B98432F3"
+/Users/yiquntchen/Library/CloudStorage/Box-Box/Derm Referrals Prediction Project/Materials_for_transition/Analysis Codes/Analysis_final_set_01052023/SL_analysis_v8.R="38018C8D"
+/Users/yiquntchen/Library/Mobile Documents/com~apple~CloudDocs/Desktop/dissertation/single_feature_testing/sim_type_1_wald.R="F5559759"
+/Users/yiquntchen/Library/Mobile Documents/com~apple~CloudDocs/Desktop/dissertation/single_feature_testing/test_1f_type_1_independent.R="7B3FB0A9"
diff --git a/R/trunc_sets_kmeans_1f_less_cond.R b/R/trunc_sets_kmeans_1f_less_cond.R
@@ -202,9 +202,10 @@ norm_phi_canonical_kmeans_1f_less_cond <- function(X, last_centroids,
 #' @return Returns an "Intervals" object containing the conditioning set.
 #'
 kmeans_compute_S_1f_iso_less_cond <- function(X, estimated_k_means,
-                                                      all_T_clusters,
+                                    all_T_clusters,
                                     all_T_centroids,
-                                    n, diff_means_feat, v_vec,v_norm, T_length, k,
+                                    n, diff_means_feat,
+                                    v_vec,v_norm, T_length, k,
                                     feat, sigma_2_feat){
 
   scaledSigRow <- rep(0,ncol(X))