Muốn một cách nhanh chóng đơn giản để tạo dấu tích của ô 3D dài hơn

Question

Tôi biết có rất nhiều cách thậm chí một số gói tốt có sẵn, nhưng tôi thấy những phương pháp này chủ yếu là quá phức tạp đối với tôi.

Vì vậy, một cách đơn giản nhanh chóng để tạo dấu tích của lô 3D (thực tế, cốt truyện được tạo ra bởi RegionPlot3D) dài hơn là bao nhiêu?

Tôi không quan tâm đến hiệu quả mã.

Cảm ơn! :)

Answer 1

Bạn có thể kiểm soát độ dài đánh dấu trong tùy chọn Ticks. Ví dụ. Ở đây họ được thiết lập để 0,06 theo một hướng:

ticks = {#, #, {0, 0.06}} & /@ (Range[11] - 6); 

RegionPlot3D[x y z < 1, {x, -5, 5}, {y, -5, 5}, {z, -5, 5}, 
PlotStyle -> Directive[Yellow, Opacity[0.5]], Mesh -> None, 
Ticks -> Table[ticks, {3}], AxesEdge -> {{-1, -1}, None, None}] 

Answer 2

Bạn có thể sử dụng một chức năng cho Ticks. chức năng đặc biệt này xuất phát từ Ticksdocumentation, (Nhấp vào khái quát và mở rộng.)

ticks[min_, max_] := Table[If[EvenQ[i], {i, i, .06, Red}, {i, i, .02, Blue}], 
    {i, Ceiling[min], Floor[max], 1}] 

Plot3D[Sin[x + y^2], {x, -3, 3}, {y, -2, 2}, Ticks -> ticks] 

Bạn có thể sử dụng một biến thể của nó để phân biệt ve lớn và nhỏ (ví dụ như giá trị Integer và phần mười. Đây chức năng cũng thẳng ra khỏi documentation (Theo Applications).

ticks[min_, max_] := 
Join[Table[{i, Style[i, 12], {.04, 0}}, {i, Ceiling[min], 
    Floor[max]}], 
    Table[{j + .5, , {.02, 0}}, {j, Round[min], Round[max - 1], 1}]] 

Answer 3

Xin lỗi, tôi không thể cưỡng lại:

tick = Import["http://www.salamatvet.com/images/tick-1.jpg"]; 
Plot[ Sin[x], {x, 0, 10}, Method -> {"AxesInFront" -> False}, 
     Ticks -> {Table[{i, Labeled[i, Image[tick, ImageSize -> 30]]}, 
         {i, 2, 10, 2}]}] 

Một đánh dấu là một đánh dấu, là một đánh dấu ...

Nhờ Alexey cho AxesInFront gợi ý.