Calculate the direction of gggenes data in R

How could I plot a group of genes in the same directions using gggenes and ggplot2 ?

I have a data obtained from a .gff file, it was generated with prokka, then it was imported with gggenomes::read_feats function, and get the genes that I want to plot, it generate the next data:

df
     file_id      seq_id  start    end strand        feat_id      locus_tag orientation     gene       cluster position
1  GENOME300 GENOME300_1 199743 201911      - IMEHDJCA_00189 IMEHDJCA_00189          -1    geneE cluster_00365   200827
2  GENOME300 GENOME300_1 201914 203275      - IMEHDJCA_00190 IMEHDJCA_00190          -1    geneD cluster_01313   202594
3  GENOME300 GENOME300_1 203272 205377      - IMEHDJCA_00191 IMEHDJCA_00191          -1    geneB cluster_00403   204324
4  GENOME300 GENOME300_1 205817 206176      + IMEHDJCA_00192 IMEHDJCA_00192           1 gene1033 cluster_06099   205996
5  GENOME300 GENOME300_1 206268 206663      + IMEHDJCA_00193 IMEHDJCA_00193           1    geneC cluster_05858   206465
6  GENOME300 GENOME300_1 206686 222306      + IMEHDJCA_00194 IMEHDJCA_00194           1    geneA cluster_00001   214496
7  GENOME320 GENOME320_8 123699 139310      - ILCJGNBA_01570 ILCJGNBA_01570          -1    geneA cluster_00001   131504
8  GENOME320 GENOME320_8 139333 139728      - ILCJGNBA_01571 ILCJGNBA_01571          -1    geneC cluster_05858   139530
9  GENOME320 GENOME320_8 139820 140179      - ILCJGNBA_01572 ILCJGNBA_01572          -1 gene1033 cluster_06099   139999
10 GENOME320 GENOME320_8 140619 142724      + ILCJGNBA_01573 ILCJGNBA_01573           1    geneB cluster_00403   141671
11 GENOME320 GENOME320_8 142721 144082      + ILCJGNBA_01574 ILCJGNBA_01574           1    geneD cluster_01322   143401
12 GENOME320 GENOME320_8 144085 146253      + ILCJGNBA_01575 ILCJGNBA_01575           1    geneE cluster_00365   145169

When I generate the plot, the genes of each genome are in different direction, is any way to recalculate the position for genes in GENOME320 and be in the same direction than GENOME300 ??

ggplot(df, aes(xmin = start, xmax = end, y = file_id, fill = gene)) +
    geom_gene_arrow(aes(forward = orientation), arrow_body_height = unit(7, "mm"), 
                    arrowhead_height = unit(7, "mm"), 
                    arrowhead_width = unit(5.7, "mm")) + 
    scale_fill_manual(values = c("orange", "blue", "red",  "green", "yellow", "#878787")) +
    facet_wrap(~ file_id, scales = "free", ncol = 1) +
    scale_y_discrete(position="right") +
    gggenes::theme_genes() +
    theme(panel.background = element_rect(fill = 'white' , color = 'white' ),
          panel.grid.major.y = ggplot2::element_line(colour = "grey", linewidth = 0.6),
          axis.title.y= element_blank(), 
          axis.text.y = element_text(size = 14, # sample name size
                                     family="Times New Roman", 
                                     face="bold"),
          plot.margin = unit(c(t=0.3, b=0.3, r=0.3, l=0.001), "mm") 
    )

enter image description here

Any suggestion ??!!

thanks

Trang chủ Giới thiệu Sinh nhật bé trai Sinh nhật bé gái Tổ chức sự kiện Biểu diễn giải trí Dịch vụ khác Trang trí tiệc cưới Tổ chức khai trương Tư vấn dịch vụ Thư viện ảnh Tin tức - sự kiện Liên hệ Chú hề sinh nhật Trang trí YEAR END PARTY công ty Trang trí tất niên cuối năm Trang trí tất niên xu hướng mới nhất Trang trí sinh nhật bé trai Hải Đăng Trang trí sinh nhật bé Khánh Vân Trang trí sinh nhật Bích Ngân Trang trí sinh nhật bé Thanh Trang Thuê ông già Noel phát quà Biểu diễn xiếc khỉ Xiếc quay đĩa Dịch vụ tổ chức sự kiện 5 sao Thông tin về chúng tôi Dịch vụ sinh nhật bé trai Dịch vụ sinh nhật bé gái Sự kiện trọn gói Các tiết mục giải trí Dịch vụ bổ trợ Tiệc cưới sang trọng Dịch vụ khai trương Tư vấn tổ chức sự kiện Hình ảnh sự kiện Cập nhật tin tức Liên hệ ngay Thuê chú hề chuyên nghiệp Tiệc tất niên cho công ty Trang trí tiệc cuối năm Tiệc tất niên độc đáo Sinh nhật bé Hải Đăng Sinh nhật đáng yêu bé Khánh Vân Sinh nhật sang trọng Bích Ngân Tiệc sinh nhật bé Thanh Trang Dịch vụ ông già Noel Xiếc thú vui nhộn Biểu diễn xiếc quay đĩa Dịch vụ tổ chức tiệc uy tín Khám phá dịch vụ của chúng tôi Tiệc sinh nhật cho bé trai Trang trí tiệc cho bé gái Gói sự kiện chuyên nghiệp Chương trình giải trí hấp dẫn Dịch vụ hỗ trợ sự kiện Trang trí tiệc cưới đẹp Khởi đầu thành công với khai trương Chuyên gia tư vấn sự kiện Xem ảnh các sự kiện đẹp Tin mới về sự kiện Kết nối với đội ngũ chuyên gia Chú hề vui nhộn cho tiệc sinh nhật Ý tưởng tiệc cuối năm Tất niên độc đáo Trang trí tiệc hiện đại Tổ chức sinh nhật cho Hải Đăng Sinh nhật độc quyền Khánh Vân Phong cách tiệc Bích Ngân Trang trí tiệc bé Thanh Trang Thuê dịch vụ ông già Noel chuyên nghiệp Xem xiếc khỉ đặc sắc Xiếc quay đĩa thú vị
Trang chủ Giới thiệu Sinh nhật bé trai Sinh nhật bé gái Tổ chức sự kiện Biểu diễn giải trí Dịch vụ khác Trang trí tiệc cưới Tổ chức khai trương Tư vấn dịch vụ Thư viện ảnh Tin tức - sự kiện Liên hệ Chú hề sinh nhật Trang trí YEAR END PARTY công ty Trang trí tất niên cuối năm Trang trí tất niên xu hướng mới nhất Trang trí sinh nhật bé trai Hải Đăng Trang trí sinh nhật bé Khánh Vân Trang trí sinh nhật Bích Ngân Trang trí sinh nhật bé Thanh Trang Thuê ông già Noel phát quà Biểu diễn xiếc khỉ Xiếc quay đĩa
Thiết kế website Thiết kế website Thiết kế website Cách kháng tài khoản quảng cáo Mua bán Fanpage Facebook Dịch vụ SEO Tổ chức sinh nhật